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Presentazione 


Questo libro ha per scopo di permettervi di trarre il massimo possibile 
dal vostro microcomputer C64. Df^po una introduzione composta da 
richiami generali suÙ*informatica, comprende essenzialmente una in^ 
trodtizione progressiva al linguaggio Basic, che è il linguaggio di pro¬ 
grammazione più spesso utilizzato sul Có4, 

Ovviarnente vi si sfruttano al massimo le particolarità del C64. La 
struttura di tale parte è concepita per permettere Pacquisizione pro¬ 
gressiva delle conoscente: essa è formata da capitoiif o piuttosto da 
serie. 

In ogni serie viene costruito pezzo per pezzo un prtifgramma, per varia¬ 
zioni continue^, introducendo a poco a poco le nozioni nuove. 
Raccomandiamo al lettore di seguire tale progressione, di provare ef¬ 
fettivamente sui proprio €64 le diverse versioni dei programmi, e pure 
di immaginarne altri. 

È la condizione necessaria per Vacquisizione di nozioni durevoli. Tut¬ 
tavia, questo libro dovrebbe anche permettere alle persone che non 
hanno ancora un €64 di farsi un'idea delle possibilità di questo 
computer. 

Per finire, l'opera termina con delle appendici dove vengono /ornile 
informazioni di referenza: spiegazione di ogni istruzione Basic^ mes¬ 
saggi d'errore, punti particolari trattati sotto forma di domande s di 
risposte. 

Ultima precisazione: tutti i programmi citati sono stati reaimenie prò- 
vati alla tastiera di un C64. 
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Capitolo 1 

Presa di contatto 


IL MESSAGGIO "3S911 BASIC BYTES FREE" 

BitSj bytesj informazioni 

Vi siete appena seduti di fronte al vostro C64 e l^avete appena acceso, 
ed ecco che visualizza '38911 BASIC BYTES FREE" la cui traduzione 
è: ”38911 BYTES LIBERI IN BASIC. Ma cosa sono questi "BYTES" 
dei quali vì si annuncia che sono '‘LIBERI*? 

Per capire — e cc nc scusiamo — dobbiamo esaminare alcune nozio¬ 
ni. Cercheremo di essei'e brevi. Il C64 è un computer, cioè una mac-' 
china per il trattamento automatico di informazioni. Si capisce che i 
computer abbiano un campo di applicazioni estremamente vasto se si 
pensa che, in definitiva, ogni attività umana si riconduce ad un certo 
trattamento dinformazioni. 

Una delle operazioni essenziali, che il computer deve poter effettuare 
su dì una informazione, è memorizzarla per essere capace di utiliz¬ 
zarla in vari momentu Ma la memorizzazione dell'infoiTnazione im- 
pìica la sua riduzione ad una forma fìsica perché possa venir imma¬ 
gazzinata nei circuiti del computer. 

Allo stato attuale della tecnologìa, I unica codifica pratica è di tipo 
binario, poiché si sanno utilizzare benissimo elementi capaci di ac¬ 
quisire due stati ben distinti, ad esempio: presenza od assenza di un 
foro su di una scheda^ elemento di banda magnetica magnetizzato in 
un senso o nell'altro, elemento di circuito elettrico elevato al poten¬ 
ziale di 5 V, o lasciato a 0, ecc. 

Tale elemento che,, in quanto informazione, è in pratica capace dì 
contenere la risposta per sì o per no ad una certa domanda sì chiama 
BIT (abbreviazione inglese di "cifra binaria": Bynary Digit). 

Ma un solo bit costituisce in genere un'informazione tioppo elemen¬ 
tare per ptJterla manipolare In modo pratico. Perciò si manipolano 
generalmente gruppi di bits. Il gruppo più spesso considerato è il 
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gruppo di 8 bits o BYTE. Per capire cosa significa "averne 38^11 Ube¬ 
ri", dobbiamo ora vedere quello che si può rappresentare con un byte^ 
cioè quali informazioni possono racchiudere in un byte. 

Per visualizzare un byte sulla carta, dobbiamo introdurre due sìmbo¬ 
li corrispondenti ai due stati che può assumere ogni bit del byte. Se 
scegliamo come simboli 0 e 1, un byte potrà essere, ad esempio, 
OlOOOOOl o lOlOOlOi oppure 01101001. Constatiamo subito che, aven¬ 
do due possibilità per ogni bit, abbiamo = 256 poi^sibilità differen¬ 
ti per un byte. 

Ora, se vogliamo che un byte rappresenti un numero, ciò è molto faci^ 
le. Basta considerare che il numero è stato espresso nel sistema di 
numerazione binaria (di base due). Così ad esempio, 01000001 varrà 1 
+ Ox2 + OX2^ + Ox2' + OX2^ + Ox2^+ 1x2" + 0X2" = 

1 + 64 = 65. Cosi come in decimale 1702 vale 2 + 0X10 + 7x10^ + 

1 X 10^. Ciascun bit rappresenta una cifra del sistema binario, dal 
che si deriva il suo nome. Il più piccolo numero che si possa rappre¬ 
sentare è OOOOOOOO {0}: il più grande è ] 1111111 (255): ritroviamo le 
256 combinazioni. Vediamo anche una cosa: siccome vogliamo poter 
manipolare numeri più grandi dì 255, talvolta L numeri dovranno oc¬ 
cupare più bytes. 

Sì può riporre qualcosa d'altro che dei numeri in un byte? Natural¬ 
mente! Supponiamo di decidere che OlOOOOOl = A, 01000010 = B ecc. 
per tutte le lettere. Di nuovo, si può avere una serie di 256 caratteri 
diversi, il che permette le lettere maiuscole e minuscole, le cifre, i ca¬ 
ratteri di punteggiatura e tanti altri. Dunque potremo immagazzinare 
qualsiasi testo nella memoria, a ragione di un carattere per byte. 
Quindi si può riporre un testo dì 39000 caratteri nella memoria del 
CÓ4, ossìa 20 pagine dì questo libro. Ciò vi permette, ora. di farvi 
un'idea miglìoit di cosa abbiamo come memoria. 

Ma c'è ancora un'altra categoria di informazioni che devono entrare 
nella memoria, ed è pure una caratteristica fondamentale dei compu- 
ters. Infatti un computer necessita, per funzionare, di istruzioni che 
gli dicano cosa deve fare. Queste istruzioni codificate opportunamen¬ 
te risiedono in memoria alla stregua delle informazioni da trattare; 
analogamente, un impiegato che effettua calcoli dì contabilità non ha 
forse in memoria la lista delle operazioni che deve effettuare accanto 
alle cifre che deve manipolare? 

La configurazione del C64 

La memoria non è ahm che una parte della configurazione di cui di¬ 
sponiamo con il CÓ4. Sul grossi computers si distinguono facilmente, 
giacché occupano ciascuno un armadio, gli clementi principali che 
sono l'unità centrale (dove si effettuano i trattamenti) e le periferiche 
che servono a comunicare con il mondo esterno (segnatamente coglie¬ 
re ì dati da trattare e fornire i risultati ottenuti). 
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Flg. 1.1. Sinottica del 


Gli stessi elementi esistono sul C64. Esteriormente, si vedono solo le 
periferiche; 

— U tastiera, che ci servirà ad inserire dati ed istru^^ioni; 

— lo schermo televisivo, sul quale saranno visualizzali ì risultati (25 
lìnee di 40 caratteri). La coppia tastìera/schermo è lo strumento del 
dialogo tra voi e La vostra macchina; 

— Vnnità di cassette magnetichef a differenza delle periferiche di co¬ 
municazione precedenti, si tratta piuttosto di una periferica di stoc- 
caggio a memoria di massa, che permette di archiviare dei program.- 
mi o dei dati se la memoria centrale è insufficiente. Ma la cassetta è 
pure una periferica di comunicazione tra C64 t voi potete inviare un 
programma o dei dati su cassetta a un arnica^ che possiede pure un 
C64: 

— centrale è nascosta, ma esiste ed in pratica è formata da 
due elementi: il processore e la memoria centrale; 

— ii processore qui è un microprocessore^ cioè un circuito integralo 
su grande scala capace di co'mandare tutto il sistema da solo: ceix:a 
in memoria le istruzioni successive,, le interpreta e le esegue; manda, 
agli altri componenti del sistema^ gli ordini necessari. Kel caso del 
C64 il microprocessore è un 6510 di Tecnologia MOS, uno dei più effi¬ 
cienti dei mercato; 

— la memoria. I 38^11 bytes visti prima, non ne formano che una 
parte. In realtà sono 82000 i bytes di memoria presenti ('); (gli infor¬ 
matici dicono 82 K dove K = 2^"" = 1024). Degli 82 K, 18 K sono ROM 
(Read Oniy Memory), memoria scritta una volta per tutte pure chia¬ 
mata Memoria Morta o MEM. che contiene quei programmi invaria- 


('} non a(;c££sibilì simulLajieamenle. [ 64 K byles dì memoria viva r64 K RAM SY¬ 
STEM”) in parte, occultati dalla memoria moria, pcrch<^ la capacilli di ìndirlicza- 
melila del microprocessore è limitala a 64 K- 
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bili che permettono al C64 di mettersi al ser\dzio dcU'iiiente (è il si¬ 
stema di gestione che presentiamo più dettagliatamente nella prossi¬ 
ma sezione). I 40 K rimanenti sono /Ì4M (Random Access Memory)» 
cioè memoria che si può leggere o scrìvere (o Memoria Viva, Ai£V). 
Essa contiene i programmi dcH'utente ed i dati variabiìi. Il C64 ne ri¬ 
serva 2 K per suo uso (un K per io schermo, un K di memoria di lavo¬ 
ro per il sistema), dunque ne rimangono 38 K liberi per l'utente. 

La figura LI dà una veduta sinottica della configurazione del C64. 
Abbiamo, ormai, completamente interpretato "38911 BYTES FREE". 
Adesso dobbiamo spiegare la lìnea "CBM BASIC che la precede. 
Sarà lo scopo della sezione successiva. 

Programmi - Sistema di gestione - BASIC 

Abbiamo appena visto che il microprocessore, elemento chiave 
deil^unità centrale, è capace di cercare in memoria le istrttzioni suc¬ 
cessive, di decifrale c di obbedir loro. In realtà, non è capace d'altro! 
Poi, per ottenere qualunque cosa dal computer, bisognerà fornigli le 
istruzioni appropriate. Senta precise istruzioni, il computer non sa 
fare nulla, non ha alcuna iniziativa, 

Una sequenza dì istruzioni che il computer deve eseguire in succes¬ 
sione si chiama un programma. Fornire una tale sequenza di istruzio¬ 
ni che permetta di risolvere un certo problema si chiama 
programmare. 

Capite dunque che dovrete fornire programmi al vostro C64, lì intro¬ 
durrete mediante la tastiera. Ma, affinché il Có4 tenga conto di ciò 
che batterete alla tastiera, deve avere un programma che glielo ordi¬ 
ni. Da solo non avrebbe rìniziativa di andare a vedere se qualcuno 
batte sulla tastiera... 

Per fortuna, non dobbiamo scrivere questo programma. Infatti, ìl C64 
— come ogni altro computer d'altra parie — viene consegnato con un 
insieme di programmi fondamentali che sono indispensabili per il 
suo uso: programma che legge la tastiera, programma che visualizza 
sullo schermo, programma che gestisce le cassette, programma che 
attende le istruzioni dell'utente, ecc. L'insieme di questi programmi 
sì chiama il sistema di gestione. 

Questi programmi risiedono in ROM, allo scopo di essere conservati 
in permanenza per essere disponibili appena accendiamo il C64. Il 
messaggio che appare sullo schermo appena è messo sotto tensione è 
un m(5o per dire all’utente che il sistema di gestione si mette a sua 
disposizione ed aspetta i suoi ordini. 

Una componente molto importante del sistema di gestione è Vinter- 
prete BASIC che ci permetterà di fornire istruzioni al C64 sotto una 
forma per noi più comoda. 

Infatti si pone il problema di sapere in che forma — o in quale lin- 
cuaceio — dobbiamo fornire le nostre istruzioni al C64. A dire il ve- 
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ry, un computer non 'capisci'* che un solo linguaggio, il linguaggio 
macchina o bin(iTÌo. 

Ad esempio, nel linguaggio macchina del C64, ^sommare 2 e 3"* si di¬ 
rebbe loioiool 00000010 00011000 olìOlOOl oooooon lOOOOlOl 
OI010000..H è estremamente compiicato da capire e da utilizzare per 
ruOTtìù! Per questo sono stati inventati altri linguaggi di pmgramma- 
zione^ che si chiamano linguaggi evoluti e sono più vicini al linguag' 
gio umano, più vicini alle notazioni matematiche usuati, e quindi più 
facili da usare^ In tale linguaggio, "sommare 2 e S*" si direbbe ad 
esen^pìo A = 2 + 3 è molto più coinprensìbile, non vi pare? 

BASIC è uno dì questi linguaggi evoluti, attualmente il più diffuso sui 
PSI [Piccoli Sistemi Individuali). È probabilmente il più semplice da 
usare per i principianti;: il suo nome è Tabbre vi azione di Beginners^ 
Atl-purpose Symbolic Instruction Code = codice simbolico distruzio¬ 
ni dì uso generale per i principianti. 

È lui che utilizzeremo sul Có4, ma non possiamo farlo senza Paiuto di 
un programma del sistema di gestione. Infatti, il C64 non capisce 
realmente che il suo linguaggio macchinai è dunque necessario un 
programma del sistema di gestione che prenda ógni istruzione del no¬ 
stro programma BASIC e la traduca In binario per eseguirla: questa è 
la funzione — essenziaie — svolta dalllntei’prete BASIC. 
Riassumendo, ciò che appare sullo schermo alla messa in funzione si¬ 
gnifica: rinterprctc BASIC del sistema di gestione è a vostra disposi- 
7 ^Ìone — disponete per il vostro programma BASIC ed i vostri dati dì 
38911 bytes liberi. L'ultima parola "READY" che riapparirà ogni volta" 
che il C64 avrò terminato un comando significa "Sono pronto ed 
aspetto che battiate la prossima istruzione". 

Facciamolo*.. 

I due modi di funzionamento di BASIC 

Mettiamoci alla tastiera e battiamo: 

BUONGIORNO C64 Return' 

(Ogni messaggio battuto dall'utente termina normalmente con il ta¬ 
sto ' Return ' — ritorno carrello. Nel seguito, cesseremo progressiva¬ 
mente di farlo figurare: sarà sottinteso e dovrà essere battuto), 
n C&4 risponde: 

?SYNTA ERROR 

Infatti, benché il nostro messaggio sìa molto educato, non costituisce 
una cori'ctta istruzione BASIC e, in conseguenza, il C64 (o piuttosto 
rinterprete BASIC) la rifiuta. Non bisogna crearsi complessi per i 
messaggi d'errore, ma ricercare con calma l'errore che sì è tatto; il 
comportamento della macchina c, in tutti ì casi, perfettamente razio¬ 
nale. Il C64 ha un repertorio di messaggi d'errore che non hanno al¬ 
tro scopo se non quello di aiutarci a correggerli. 
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Battiamo ora; 

?*BUONGIORNO!SONO IL C64' ^ Return ' 

(gli spa^i si ottengono mediante la sbarra di spa^io)^ 

Questa volta, abbiamo battuto una buona istruzione, ed otteniamo 
per risposta; 

BUONGIORNO! SONO IL C64 
READY, 

Non ottenete questa risposta? siete ben sicuri di aver battuto tutti i 
caratteri, comprese le virgolette? _ 

Il punto interrogativo significa semplicemente 'stampare , Constatia¬ 
mo che abbiamo ottenuto una risposta immediata all'istruzione. 
ParimentL se battiamo: 

?2-t-2 ' Return ' 

il C64 farà il calcolo e stamperà Immediatamente il risultatOn Si ha 
quindi un modo di funzionamento pressappoco simile a quello di una 
calcolatrice tascabile> dove un'istruzione è eseguita appena è stata 
battuta. Si dice che si tratta del "modo immediato* o "^modo d'esecu¬ 
zione immediata* ovvero "modo diretto'. 

11 C64 ha un secondo modo di funzionamento. Battiamo: 

20 ?2 + 2 ^ Return ' 

Non succede nulla. Battiamo ancora; 

10 ?~BTJONGTORNO* ^ Return ' 

Ancora nulla. Battiamo: 

RUN (le lettere R U N, non il tasto ' Run/sto p') 

Questa volta otteniamo sullo schermo: 

buongiorno 

4 

READY, 

Cos'è successo? Ebbene, abbiamo funzionato nel secondo modo, nel 
quale le istruzioni non vengono eseguite immediatamentex ma sono 
messe in memoria per esecuzione ulteriore. Formano allora un pro¬ 
gramma che viene eseguito quando battiamo il comando RUN in mo¬ 
do diretto. ^ . 

Tranne un paio di eccezioni, sono esattamente le stesse istruzioni che 
possono essere date nel modo diretto o nel secondo modo, chiamato 
"modo differito" o "modo programmato*. 

Allora, da cosa si riconosce il modo? , i . 

È semplicissimo; in modo differito, ogni istruzione possiede m testa 
un numero di linea, mentre in modo diretto non c'è numero dì linea: 
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72 + 2 modo dir<ìUo 

IO 72 + 2 modo differì to(bisogiia batte re RUNperot tenere ta risposta). 

Oltre ad imporre il modo programmato^ ìL numero dì lìnea svolge 
un^aUra funzione: vediamo dairesempio precedente che l'istruzione 

10 è stata eseguita prima dal L'istruzione 20, benché sia stata battuta 
dopo: le istruzioni vengono eseguite non nell'ordine cronologico nel 
quale sono state battute, ma in ordine di numeri dì riga crescenti. 

11 C64 è naturalmente molto più usato in modo programmato, ma, 
prima^ per familiarizza rei, effettueremo alcuni calcoli aritmetici in 
modo diretto. 

Aritmetica in modo diretto 

Come ogni calcolatrice, il C64 permette di valutare espressioni più 
complicate di 2 + 2! In ogni caso si deve incominciare con un ? o con 
la parola FRtNT di cui è l'abbreviazione: ciò significa ‘stampate il ri¬ 
sultato dell'espressione che segue^ 

Provate (i ' Return ' sono sottintesi) 

?5—5.5 (sottrazione: risultato 1.5) 

?54 12 (moltiplicazione: risultato 56) 

?l/3 (divisione; risultato .355333333) 

?2t5 (elevazione alla potenza: risultato 2* = 32) 

Si vede dunque quali sono i segni dì operazione fondamentali. Si nott 
• e non x per la moltiplicazione, t per l'elevazione alla potenza (da ta¬ 
stiera non si può mettere un numero più in alto di un altro). 

VarìabiU 

Data un'espressione, se ne può fare altro che stampare il suo valore: 
Si può mettere il valore in memoria per uso ulteriore in un^altra 
espressione. 

Per fare ciò, basta dare un nome all'espressione, battendo ad 
esempio: 

A = 2/3 

Si dice che è stata costituita una variabile dì nome A. Il C64 le attri¬ 
buisce automaticamente un posto memoria (che non dovete conosce¬ 
re: il C64 si occupa interamente della gestione della memoria). Poi, 
viene calcolato il risultato e viene riposto nella casella memoria con¬ 
siderata; non appare sullo schermo. 

La variabile può ora essere usata in un'altra espressione; se 
battiamo: 

?2*A 


otteniamo 


1.33333333 
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Quali nomi di variabìii sì possono prendere? 1 nomi di variabili sono 
praticamente arbitrari, con la limitazione che devono piegarsi alle se¬ 
guenti costrizioni: 

— primo carattere: ietterà; 

— caratteri successivi: lettere o cifre (es. A, Al, VAR, RESULT, 
H2S04). 

Il C64 permette più di due caratteri, ma non tiene conto che dei due 
primi. Se due variabili che considerate distinte hanno i loro due pri¬ 
mi caratteri identici, il C64 le confonderà: ad esempio, è il caso dì AL* 
BERTO e ALDO, 

Il fatto dì poter usare più dì due caratteri permette dì scegliere nomi 
'evocativi" come RESULT, TASSO, CAP„,, ma il nome non deve conte¬ 
nere una delle parole speciali del linguaggio BASIC, che si chiamano 
parole chiave: CIFRA è proibita perché contiene IF che è una parola 
di significato particolare per BASIC 

La lista delle pai-oLe chiave 'riservate' è fornita in appendice. 

L'uso di una variabile non ne distrugge il valore, o piuttosto non can¬ 
cella la memoria corrispondente. Non è che in caso di una nuova 
istruzione dì assegnamento {della Forma A=..,) che il valore verrà 
cambiato. 

Provate il seguente dialogo (omettiamo i 'Return^ ed i READY); 

AL = 3 
?AL+5 

8 (5 + 3 = 8) 

?3*AL (AL vale sempre 3) 

9 (3x3=9) 

ALDO= I (ALDO è la stessa variabile di AL. ora ha preso il valore l) 
?AL+1 

2 (1 + 1 = 2 ) 

Rimane ancora un problema: a quante variabili abbiamo diritto? Il li- 
mite reale è di fatto la dimensione della memoria ma possiamo spera¬ 
re di avere centinaia di variabili, cioè abbastanza da trattare ì proble¬ 
mi più complessi. 

Valutazione delle espressioni 

Si possono calcolare espressioni più complesse che racchiudano più 
operazioni. Provale: 

?5+4*2 

?2*3T2 

?5*3/4 

Il risultato della prima è 13, cioè è stata effettuata prima la moltipli¬ 
cazione. La seconda dà IS, perché è stato effettuato prima il 3^ l.a 
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si valuta calcolando prima 5x3 divìdendo poi il risultato per 4. 
Riassurnendo, si effettuano generalmente le opera^iioni da sinistra 
verso destra ma esiste una regola di priorità degli operatori: 

Tèi! più prioritario, poi abbiamo: 

— (prendere Topposto^^ esempio: —X), poi: 

* e / (ex-aequo), poi: 

+ e — (ex-aequo)t 

Se si vuole cambiare l'ordme delle priorità, si usano parentesi: un 
gruppo tra parentesi è sempre valutato per primot Ad esempio: 

(2 + lOyS dà 2-4 mentre 2+ 10/5 dà 4 
6—(3 + S) dà —2 mentre 6—3 + 5 dà 8. 

Si possono usare parentesi composte, ma deve sempre esserci lo steS' 
so numero di parentesi aperte e chiuse e Tespressione deve sempre 
avere un senso. Ad esempio: 

?(A—3*(B^C)y5T{B*C) 

Disponiamo, per facilitare i calcoli, di un insieme di funzioni mate¬ 
matiche che possono intervenire nelle espressioni aritmetiche. Il loro 
argomento, come ogni sottoespressione tra parentesi, viene valutato 
prioritariamente. La lista completa dì tali funzioni è data in appendi¬ 
ce, ma citiamo subito: SIN (seno), CCS (coseno), EXP (esponenziale) 

?l + S0R{2) dà 2.41421356 

Precisione dei numeri 

Esaminando ì risultati ottenuti negli esempi precedenti, possiamo fa¬ 
re alcune osservazioni: 

— Il C64 può stampare numeri positivi o negativi. Stampa uno spa¬ 
zio in testa per un numero positivo, un — per un numero negativo. 

— Il C64 può stampare numeri interi o frazionari. Per i numeri fra¬ 
zionari si usa un . (convenzione anglosassone) invece della virgola de¬ 
gli italiani. Si usa il sistema decimale: non ci si deve preoccupare del 
binario. Segnaliamo pure che gli zero sono sbarrati cosi da non es¬ 
sere confusi con la lettera O. 

— Il CÓ4 stampa al massimo 9 cifre significative. Ne usa un po' di 
più nella rappresentazione interna per fare i calcoli, ma non ne *'mo- 
stra' più dì 9. La rappresentazione interna è sempre frazionaria ma 
se, a parte l'imprecisione dei calcoli, il numero è abbastanza vicino 
ad un intero, verrà stampalo come intero. 

? 14.99999999 dà 15 

— Se il numero da stampare è minore di 0.1 o maggiore di 
999999999 ^ viene stampato in "notazione mobile'', cioè nella forma: 
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Sx,x?cxxxxx5( Estt (x e t sono cifre, S è il segno del numero, s il segno 
deli'esponente). 

? 0.000123 dà 1.23E—04 

che si interpreta conne 1^23 X 10“ 

2^1000000000 dà — 1E09 

che si interpreta come —IX 10^ 

Ecco conclusa la nostra presa di contatto con il C64. Speriamo non 
sia stata troppo ardua, e vi incoraggiamo a provare altri esempi, per 
familiarizzarvi bene. 

Ora siamo pronti ad usare il Có4 in modo programmato. 





Capitolo 
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IL NOSTRO PRIMO PROGRAMMA 

Pur cominciando con nozioni semplicissime passiamo ad una prò 
grammazione più elaborata in modo differito. 

Ogni trattamento d'informazioni, quindi ogni programma, compren¬ 
de tre tappe fondamentali, immutabili: 

— Vacquisiziorie o immissione dei dati da trattare; 

— il truUarrtettio dei dati cioè il calcolo dei risultati; 

— l'«jciV(3 dei risultati. 

Avremo dunque in BASIC tre istruzioni fondamentali corrispondenti 
a questre tre azioni; le ritroviamo nel programma A.l il cui scopo è 
semplicemente di calcolare la superficie di un cerchio dì raggio R 
(S=irR'). 

Programma Ad 

10 INPUT R 
20 S = ir*Rl5 
30 PRINT S 

i programmi vengono identificati da una lettera seguita da un nume¬ 
ro di versione. 

L'istruzione 10 corrisponde alTimmissione dalla tastiera del raggio 
R. Quando avrete battuto RUN, in esecuzione dì tale istruzione, il C64 
visualizzerà sullo schermo un ? e il cursore lampeggiante. Sì metterà 
in attesa che battiate un valore del raggio* Quando l'avrete fatto, sen¬ 
za dimenticare il ' Return ', il C64 assegnerà quel valore alla variabile 
e passerà airistruzione successiva. 

L'istruzione 20 è l’istruzione di calcolo vero e proprio della superficie 



12 Lb. dtl Coimnddore 64 


alla quale abbiamo dato iJ nome di variabile S. L'espressione aritme¬ 
tica BASIC È una copia quasi conforme (i segni di operazione sono ob¬ 
bligatori) della fùrmula matematica che interviene, Moliamo che il 
BASIC del C64 conosce t, il che j^emplìfica la battitura. 

L'istruzione 30 chiede semplicemente la visualizzazione del risultato 
7.0685S347, come abbiamo visto nel modo diretto. 

Tutto questo è semplice vero? Ebbene ciò racchiude il %% di tutto il 
BASIC, dato che tutto si basa sulle tre operazioni fondamentali che 
abbiamo citato. 

Benché sia semplice, il programma che abbiamo appena scrìtto fun¬ 
ziona in modo soddisfacente: per calcolare la superficie di un cer* 
chio, si balte RUN poi, appena il Có4 visualizza un punto interrogati¬ 
vo, si batte il valore del raggio considerato, e appena premiamo il ta¬ 
sto ' Return ", il risultato appare sullo schermo. Ed ogni volta che bat¬ 
tiamo RTJN, il programma viene rieseguito per un raggio nuovo: pos¬ 
siamo avere la superficie corrispondente a tanti raggi quanti ne vo¬ 
gliamo. Il fatto di eseguire un programma non lo ‘'consuma", cioè es¬ 
so rimane in memoria e, appena battiamo il comando diretto RUN se¬ 
guito da 'Return', il programma presente in memoria si esegue. 

Qualche perfezionamento 

Tuttavia, il comportamento di questo programma ha alcuni inconve¬ 
nienti ai quali rimedieremo; questo ci permetterà di vedere nuove 
istruzioni BASIC o nuove forme di quelle che conosciamo. Seguiremo 
del resto questo metodo per tutto il libro. 

Obiezione n. I: quando il C64 visualizza il ? nel corso dell'istruzione 
INPUT, nulla indica che è un raggio che si aspetta: ciò non ci distur¬ 
ba poiché lo sappiamo, ma una persona che non conoscesse il pro¬ 
gramma non saprebbe che rispondere al punto interrogativo. Perfino 
l'autore di un programma, nel caso di un programma che abbisogna 
di molti dati, può aver bisogno che gli si ricordi in che ordine deve 
inserirli. 

Riassumendo, visualizzare un messaggio che dica alTutente quali so¬ 
no ì dati attesi dalFlNPUT, sarebbe la cosa desiderabile. Gradirem¬ 
mo, ad esempio, avere un messaggio de! tipo; 

RAGGIO DEL CERCHIO? o: DATE UN RAGGIO? 

Ebbene BASIC lo permette molto facilmente. Infatti possiamo usare 
INPUT nella forma: 

INPUT "testo": variabile 

A questo punto, il testo tra apici apparirà sullo schermo, seguito dal 
punto interrogativo abituale di INPUT^ e basta rispondere come nel 
caso precedente. 
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Così, se sostituiamo l'istruzione 10 del programma A,1 con: 

10 INPUT 'RAGGIO DEL CERCHIO’': R 

il nostro problema sarà totalmente risolto- Il punto e vìrgola che Sfi’ 
para 11 testo dalla lista di variabili è imperativo, come pure gli apici 
che delimitano il testo. 

Va bene, ma come sostituire la vecchia istruzione IO con la nuova? 
Semplicemente battendo la nuova istruzione 10, senza dimenticare di 
iniziare con il numero. Essa andrà a sostituire quella vecchia nella 
memoria dove il programma è conservato, 

Ohiezw»é n. 2: quando è visualizzato il risultato, otteniamo un nume¬ 
ro, ma nulla indica che si tratta della superficie del cerchio- Gradi¬ 
remmo anche qui che un messaggio opportuno ci illuminasse. Nel ca¬ 
so di un programma che fornisse molti risultaiL sarebbe del tutto in¬ 
dispensabile che ogni risultato fosse identificato. 

Come quello precedente, questo problema si risolve facilmente in BA¬ 
SIC, Basta sapere che si può, mediante PRINT, visualizzare qualsiasi 
testo racchiuso tra apici. Così potremo sostituire ristruzìone 30 con: 

30 PRINT "SUPERFICIE = ",S 

e sarà detto tutto. 

Ora avremo un dialogo della forma (sottolineiamo ciò che e battuto 
dall'utente): 

RUN 

RAGGIO DEL CERCHIO? 10 
SUPERFICIE = 314.159265 
READY. 

Obiezione m, 3: il nostro programma è nettamente miglioralo, soprat¬ 
tutto dal punto di vista del dialogo uomo macchina, e ogni entrata- 
uscita deve presentarsi così. Ma rimane ancora un piccolo elemento 
dì sconforto: quando si vogliono trattare più raggi, bisogna ogni volta 
battere RUN, il che è un po' fastidioso, 

BASIC ha una risposta: aggiungeremo alla fine del programrna 
un'istruzione che dice al C64 "ricomincia Tesécuzione dalrìnizio 
( —ristruzione IO)". 

Aggiungeremo l'istruzione: 

40 GOTO 10 

Sapendo che "GOTO" significa "andare a", il funzionamento è eviden¬ 
te: ogni volta che è stato fatto un calcolo e il suo risultato è stato 
stampato. Il C64 arriva alPìstruzione 40 che lo rimanda in 10 dove si 

chiede un nuovo raggio e cosi via... r -t j 

Disponiamo ora del programma A,2 che, benché sia stato facile da 
scrivere, ha un comportamento molto comodo. Esso fa apparire una 
nozione imp^ortante, la nozione di ciclo. Una st l’ut tura composta da 
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un gruppo di istruzioni che verranno eseguite più volte si chiama un 
ciclo. La possibilità di eseguire cicli, quindi di eseguire caicoii iterati* 
vi, è un punto forte dei computers. 

Programma A.2 

10 INPUT 'RAGGIO DEL CERCHIO"; R 
20 S=ir*RT2 

30 PRiNT 'SUPERFICIE-",S 
40 GOTO 10 

N,B. Nelle liste che diamo come qui sopra, stampiamo una riga per 
istruzione, anche se questa appare su due righe sullo schermo del 
C64 a causa del suo limite di 40 colonne di larghezza dello schermo. 

Uscita da INPUT per STOP-RESTORE 

Il ciclo che abbiamo appena visto nel programma A,2 risolveva un 
problema ma ce ne pone un altro: infatti, non finisce mai, AlFinfinito 
il C64 chiederà un nuovo raggio^ c un altro ancora.,. 

In realtà è normalmente proibito inserire un tale ciclo infinito in un 
programma; deve essere sicuro che ogni programma termini dopo un 
tempo finito. Vedremo in seguito istruzioni che permettono di stabili' 
re cicli dei quali si è certi che terminino. Tuttavia il male è minore 
quando il ciclo infinito contiene un'istruzione INPUT: in tal caso di* 
sponiamo di un modo per uscirne. 

Infatti, ad ogni iterazione, quando esegue l'istruzione INPUT, il C64 
s'interrompe nelTattesa del dato che dobbiamo fornire. In quel mo¬ 
mento, se battiamo contemporaneamente i tasti ' Sto p' e 'Rtìstore', al¬ 
lora il CÓ4 esce dal programma, svuota lo' schermo e otteniamo il 
messaggio READY. 

Il programma A,2 è dunque corretto: possiamo avere la superficie dì 
tutti i cerchi che vogliamo, e quando non ne vogliamo più, battiamo i 
tasti 'Stop' e 'Restore" per terminare. 

Stop e CONT 

Sfortunatamente può accadere che la situazione $ì accomodi meno 
bene. Se, in seguito ad un errore dì programmazionCi il computer si 
perde in un ciclo senza fine e gira all'Infinito senza fornire risultati, 
se ne può riprendere il controllo? 

Sii Basta premere il tasto ' Stop '. Si ottiene immediatamente il 
messaggio: 

BREAK IN... (interruzione all'istruzione numero...) 

READY 

Si possono quindi far stampare alcune variabili per vedeie se lutto è 
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corretto. Infatti può succedere che non si ottengono risultati per mol* 
ro tempo, semplicemente perché i calcoli sono lunghi e non perché $i 
ha un ciclo infinito. In quel caso, sì può far riprendere l'esecuzione 
nel punto ìn cui si era fermata, battendo in modo diretto il comando- 
CONT, 

Che differenza c'è tra 'Stop' da solo e ^Stop' con ' Reattore '? 

S^p’ da solo ferma Tesecuzione del programma in modo che possa 
riprendere con CONT. 

Ma ^Stop^ da solo è inoperoso quando il programma si trova in attesa 
su INPUT- non si può interrompere i>e non mediante 'Stop' - 'R esto- 
re'. 'Sm|5' - ' Restore ' ha effetti diversi da quelli di una semplice istru¬ 
zione: il programma non può più riprendere con CONT, lo schermo è 
svuotato e vedremo più tardi che se erano stati cambiati, i valori del¬ 
lo schermo e del quadro sono riportati ai loro valori standard (fondo 
azzurro, quadro e caratteri azzurro chiaro) che si hanno al momento 
dell'accensione. 

e 'Restore' creano quindi una specie di azzeramento della mac¬ 
china, un po' come quando si spegne il C64 e poi lo sì riaccende. Esì¬ 
ste tuttavia un'importante differenza: quando spegnete il C64 e lo 
riaccendete, anche il più presto che potete, tutto il contenuto della 
memoria viene cancellato, mentre con 'Stop' e ' Restore ' Il program¬ 
ma che sta in memoria viene conservato* 

Compìementi; sènza pretendere di essere completi (il miglior modo di 
imparare tutte le particolarità di un linguaggio, è la pratica) c'è un 
paio di dettagli supplementari che dobbiamo darvi su INPUT e su 
PRINT. 

ìiì$eTÌfnenio di più dati: possiamo inserire più dati in una stessa 
istruzione INPUT. Ad esempio, se, invece di calcolare la superficie 
del cerchio, volessimo calcolare il volume di un cilindro, bisognereb¬ 
be dare il raggio ma anche l'altezza H. 

Si potrebbe usare un'istruzione della forma: 

10 INPUT “RAGGIO, ALTEZZA". R, H 

e, in risposta, si dovrebbero ora battere due numeri separati da una 
virgola: 

RAGGIO, ALTEZZA? 15.5, 20 Return ' 

Non confondete il punto di 15.5 che, in notazione inglese, separa par¬ 
te intera e parte decimale di un numero, con la virgola che separa 
due numeri diversi che andranno in variabili diverse* 

Piccola "posta del cuore": m risposta ad tiri INPUT /, J ne! quale dove^ 
vo inserire t valori 45 e 105^ per errore ho piazzìtito male la virgola e 
battuto 4^5105. Che cosa succede?: ...il Có4 incomineerà i calcoli con i 
valori 1 = 4 e J = 5105, che non sono quelli che desiderater 
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Alirs domanda: ad un iNPUT J net quale dovevo fornire due valori^ 
ne ho dato uno solo^ seguito da ' Return '. Che cosa succede?: ...mente 
di grave, il C64 terrà conto di questo primo valore e, vedendo che 
gliene serve un altro, visualizzerà un doppio punto interrogativo. 
Quando abbiamo un IKPUT a più variabili, possiamo raggruppare i 
dati che forniamo come vogliamo, poiché, finché non avrà avuto tutti 
i valori che aspettava, il C64 ve lo segnalerà visualizzando due punti 
interrogativi. 

Esempio di dialogo' (istruzione 10 INPUT 'l.F; I,J) 

I,J ? 45 ^Return ' 

?? 1 05 Return ' 

Al contrario, ora, batto troppi valori (esempio: 45, 105, 2(X) per INPUT 
l, J}. Che cosa succede?: .,dl C64 tiene conto degli n primi valori se ne 
aspetta n {nel nostro esempio 1 = 45 e J = 105) e stampa EXTRA 
IGNORED il che indica che ì ^^alori supplementari (e superflui) vengo¬ 
no ignoratip 

B se non batto alcun valore, cioè, se l'n risposta ad mh INPUT, faccio 
'Return'subito?: ...Allora il Có4conserva i vecchi valori delle variabili 
che sono oggetto dell INPUT: non dà doppio punto interrogativo. 

Espressione aritmetica in un comando PRlNT: finora abbiamo chiesto 
la stampa o di un titolo o del valore di una variabile. Si tratta di casi 
particolari de il a legge generale che permette di mettere come clc' 
mento da stampare qualsiasi espressione aritmetica: il C64 effettuerà 
il calcolo e visualizzerà il valore ottenuto. 

Battete 

?'5 HA PER QUADRATO", 5t2 
Otterrete ^ QUADRATO 25 

caso particolare di espressione aritmetica, si può mettere una variai 
bile, ma anche una ctJStante. Si potrebbe scrivere: 

''HA PER QUADRATO", 5t2 

invece dell'esempio precedente. 

Quando facciamo stampare un titolo, sfruttiamo il latto seguente; 
ogni testo racchiuso fra apici costituisce una costante stringa di 
caratteri. 

Separazione degli elementi in una lista di stampa: é beninteso che lad¬ 
dove diciamo "stampa" bisogna intendere "visualizzazione sullo schei^ 
mo", ma con il C64 basta una sola istruzione che vedremo più tardi 
affinché tutte le informazioni chiamate in causa da tutti i comandi 
PRINT appaiano alla stampante se se ne dispone. 

Finiamo anche con i! punto interrogativo: sul Cb4, il ? è una comoda 
abbreviazione dclTistruzione PRINT. 

D'altronde, nei vari esempi precedenti, quando abbiamo voluto visua- 
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]ì]i:zare più ìfiformazioni nello stesso comando PRINT, le abbiamo se¬ 
parate ora con una virgola^ ora con un punto e virgola. Qual è la dif¬ 
ferenza? Quando due z^ine ììoiìo separate da un punto e virgola, sa¬ 
ranno stampate congiunte sulla linea, mentre se sono separale da 
una virgola, la stampa della seconda zona comincerà alla prossima 
colonna dal numero multiplo di 10+ 1, libera (ciò sì chiama tabula¬ 
zione). Provate: 

? A,B 

0 0 
? A; B 
0 0 

Perché non sono attaccati nel secondo esempio gli zeri? Perché ogni 
numero stampato comporta un segno (qui si ha uno spazio poiché i 
numeri sono positivi) ed è seguito da uno spazio. 

Cosa avviene con le stringhe di caratteri? 

Piovate: 

'BUON"; "GIORNO" 

BUONGIORNO 
?*BUON", 'GIORNO- 
BUON GIORNO 

?-EHI BUONGIORNO", "SIGNORE' 

EHI BUONGIORNO SIGNORE 

NeU'ultimo esempio, siccome la O Finale di BUONGIORNO stava in 
colonna 14, SIGNORE è mandato in colonna 2L 
Ancora due indicazioni: 

— Se non mettessimo alcun separatore, il C64 farebbe come se aves¬ 
simo messo un punto e virgola. Ma ciò è possibile soltanto fra due 
stringhe di caratteri, o fra stringa e variabile. 

— Si può terminare il comando PRINT con una, o con un; mentre 
non c'È nulla da separare. L'effetto di ciò è che ii prossimo ordine 
PRINT scriverà sulla stessa linea, in modo concatenato o con una ta¬ 
bulazione, a seconda che avremo messo, o; 

Provate i programmli 

1 

10 ?-BUON" 

20 ?-GlORNO'' 

BUON 
GIORNO 

Tutto proviene dal fatto che un ordine PRINT normale effettua un ri¬ 
torno carrello per terminare, che è soppresso dal ; e dalla Invece, se 
vogliamo spostarci di una linea in avanti senza stampare nulla, basta 
mettere PRINT e basta. 

Precisiamo infine che, se per un PRINT, la , o il ; non fanno grande 


2 3 

10 ?-BUON-; IO ?’'8UON'', 

20 ?"GIORNO'' 20 ?"GIORNO* 

BUONGIORNO BUON GIORNO 
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differenza tranne se vogliamo curare rimpaginazione» per INPUT so¬ 
no essenziali e per niente intercambiabili: le variabili da immettere 
devono essere separate da virgole (cosi come i dati al momento in cui 
li forniamo) e, se c'è un messaggio di titolo, deve essere separato dal 
resto da un punto e virgola. 


ESERCIZI 


Benché abbiamo visto soltanto tre istruzioni BASIQ abbiamo già in 
mano possibilità immense, poiché esse coprono le tre operazioni fon¬ 
damentali di ogni trattamento: 

— immettere i dati; 

— calcolare; 

— far uscire ì dati. 

Verifichiamolo sui due esercizi che vi raccomandiamo fortemente di 
svolgere senza guardare la soluzione alla fine del volume^ 


(\seiTtzio 2.1 


Modific^ìTC il programma A.2 per calcolare il volume di 
cilindri di raggio R e altezza H. 


Esercizio 2,2 


Scrivere un programma di struttura analoga, ma per 
calcolare l'interesse dato da mh certo capitale piazzato ad uu certo las¬ 
so per N anni (interessi composti amiualmente). 


Nota: la numerazione degli esercizi è fatta sotto la forma capitolo. 
Numero. 





Capitolo ^ 

Comandi fondamentali 


Un programma inserito in modo diretto può essere usato soltanto in 
congiunzione con un certo numero di comandi in modo diretto, che 
dicano al sistema di gestione cosa vogliamo fare. 

Abbiamo già visto il più fondamentale di questi comandi: RUM che 
permette di eseguire il programma^ 

Ma si possono fare altre operazioni su di nn programm^ir Lo si può li¬ 
stare, cioè stampare le sue istruzioni, il che è utile, soprattutto per ri-_ 
cercare errori, o se si progetta una modifica. Lo si può correggere e, 
per questo, il C64 è estremamente comodo. Lo sì può salvare su cas¬ 
setta per poterlo usare ulteriormente senza doverlo ribattere. 

Il C64 possiede tutto un ambiente di comandi che permettono queste 
operazioni. È Indispensabile che le vediamo ora. 

LIST 

LIST da solo fornisce sullo schermo la copia dì tutto il programma 
presente in memoria. Se non c'è un programma, ad esempio subito 
dopo Taccensione, il Có4 visualizza READY immediatamente. Sì dice 
che si ottiene la lista, o in italinglese il listing del programman 
Se il programma è molto lungo, e quindi non sta nelle 25 righe dello 
schermo, la lista scorrerà sullo schermo (una lìnea appare in basso 
quando una lìnea sparisce in alto) e la lettura sarà difficile. Per facili¬ 
tarla, possiamo rallentare la velocità di scorrimento tenendo premu¬ 
to il tasto 'CTRL'. 

Potete provarci, ma i programmi che vi abbiamo scritto finora sono 
un po' corti perché $i veda bene. 

Due particolarità sono apparse sulle liste che abbiamo potuto ottene¬ 
re facendo qualche prova: 
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— le istruzioni appaiono sulla Usta neU'ordme dei numeri crescenti, 
cioè lo stesso ornine deiresecuzione, quale che sia Tordine nel quale 
sono state battute; 

— se, per istruzioni di stampa, abbiamo usato il punto interrogativo, 
sulla lista è la parola PRIMT che appare. 

Supponiemo nel seguito di avere in memoria il programma A.2 del 
capitolo precedente. 

Li$te parziali 


Si può listare un'istruzione sola, dandone il numero: LIST x 

LIST 20 
20 S-t*RT2 

Per listare tutte le istruzioni comprese tra le istruzioni di numero s e 
y, si batte LIST x-y 

LIST 20-30 
20 S = ir*Rt2 

30 PRINT "SUPERFICIE = ', S 

Gii estremi — se esistono — sono compresi. 

LIST 15-35 darebbe lo stesso risultato delTesempio precedente. 

LIST — x: lista dalLìnizio fino alla linea tu 

LIST —20 

10 INPUT "RAGGIO DEL CERCHIO"; R 
20 S = t*RT2 

LIST X —lista dalla linea x fino alla fine: 

LIST 30_ 

30 frinì "SUPERFICIE S 
40 GOTO 10 

Come Tesecuzione di un programma, anche una lista può essere in¬ 
terrotta medianttì il tasto " Run/Sto p'. In coppia con il LIST x—, ciò 
permette di listare un programma fungo per pezzi: si preme ' Sto p' 
quando si vede che lo schermo si sta riempiendo. 

Naturalmente, se non c'è nessuna istruzione nelPintervaUo richiesto, 
riceviamo subito READY, 


NEW 

Quando battiamo un'istruzione BASIC in modo programmato (dun 
que con un numero) possono accadere due cose: 
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— o l'istruzione che abbiarno appena battuto ha lo stesso numero di 
un'istruzione già presente; allora viene a sosfffHire quella vecchia; 

— oppure non esisteva un'istruzione dello stesso nuTnero di quella 
che abbiamo appena battuto: allora — come potremo constatare chie¬ 
dendo LIST — l'istruzione viene ad intercalarsi nel programma al po¬ 
sto implicato dal numem. 

Ne risulta che» se vogliamo introdun'e un programma completamene 
te nuovo, e se le istruzioni nuove non corrispondono una per una a 
quelle dei vecchio programma, rimarranno vecchie istruzioni in meZ' 
zo alle nuove che, naturalmente, perturberanno il funzionamento. 

Il comando NEW ha lo scopo di eliminare questo inconveniente: il 
suo effetto è dì sopprimere completamente il programma presente at¬ 
tualmente. È consigliato dì usarlo prima di battere un nuovo 
programma. 

NEW non deve essere confuso con un altro comando o istruzione 
CLR che ha, da parte sua, l'effetto di azzerare tutte le variabili. In 
pratica, NEW svuota la memoria programma mentre CLR svuota la 
memoria dati (l'una e l'altra sono due zone della stessa memoria}, 

Nota: In realtà, NEW contiene CLR, cioè, quando facciamo NEW, 
contemporaneamente tutte le variabili sono azzerate. Parimenti, 
RUN contiene CLR, di modo che all'inìzio dell'esecuzione dì un pro¬ 
gramma, tutte le variabili hanno valore 0 finché un'istruzione dà loro 
un altro valore. 


RUN 


Conosciamo già bene il comando RUN “tout court". Lo si può usare 
anche nella forma RUN x dove x è un numero d'istruzione. Ciò avrà 
l'effetto di lanciare l'esecuzione del programma, ma dalla riga x in 
poi. 

Domanda: Ho un programma che comporta l'istruzione 10. Posso lan¬ 
ciarlo con RUN lO. Posso anche lanciarlo battendo GOTO 10 in modo 
diretto. Qual è la differenza? 

— RUN 10 azzera le variabili, cosa che GOTO 10 non fa. Introducete 
il programma: 



5 A-3 
10 ?A 


e provate ì dialoghi: 

1 

2 

3 

A = 5 

A = S 

A = 5 

RUN 

RUN 10 

GOTO IO 
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Effetto: 

3 0 5 

Nel primo caso, sì passa sopra all’istruzione che dà ad A il valore 3. 
Nel secondo caso. RUN a?,7era A, Soltanto nel terzo caso l'effetto 
dell'assegnamento in modo diretto verrà conservato. 

END 

Il RUN numero permettere di costituire un programma a più parti ta* 
li che si esegua ora Tuna ora l'altra. Basta battere RUN numero della 
prima istruzione della parte voluta. 

Sh ma supponiamo dì aver eseguito la prima parte: ora andremo a fi¬ 
nire nella seconda parte, cosa per niente desiderabile. Basta termina* 
re ogni parte con un'istruzione END che vuol dire 'tornare al livello 
di comando diretto*. Dopo l'esecuzione di un'istruzione END^ BASIC 
visualizza READY, Per buona regola, il nostro programma A.l doveva 
terminare con un'istruzione: 

40 END 

Maj in pratica^ quando Basic arriva all'ultima istruzione di un pro¬ 
gramma senza incontrare END, sì comporta come se tale istruzione 
ci fosse. 

Scrittura di un programma 

Dobbiamo ora vedere tutto un insieme di procedure che permettono 
dì modificare o correggere un programma dovendo ribattere il meno 
possibile. 

Da questo punto di vista, il C64 è particolarmente comodo. Ma prima 
di vedere queste procedure, dobbiamo fare una conoscenza più am¬ 
pia con la tastiera. Avremmo potuto farlo in precedenza, prima anco¬ 
ra di procedere aJle nostre prime prove, ma abbiamo potuto farne a 
meno, mentre ora è indispensabile. 

La tastiera del C64 

La tastiera deJ C64 è rappresentata nella figura 3.1, I quattro grossi 
tasti più chiari situati a destra sono ciò che chiamiamo tasti di fun* 
zioni pre-programmate: hanno un effetto particoJarc che è determina* 
to da certi programmi, di giochi in particolare. Non ne parleremo 
più. 

Possiamo considerare che ci sono tre tipi di tasti: 

— i tasti ordinari, che quando premuti fanno apparire il carattere 
corrispondente sullo schermo: ad esempio^ quando premete il tasto 
A, una A si stampa sullo schermo; 
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FJg, 3.1. La tastiera del 


— i tasti di modificazione di ciò che viene visualizzato ed i tasti spe^ 
ciali: come 'Return' o i tasti di movimento del cursore; 

“ i tasti di connandì che, premuti simultaneamente ad un secondo ta¬ 
sto, determinano la funzione del secondo tasto. I tasti dì comando so 
no ' SHITF ' (ne esistono due che sono perfet tam ente equivalenti), 
SHIFT LOCK (che blocca in posizione SHIFT), [0=] (si tratta dell'em¬ 
blema del costruttore Commodore; lo designeremo spesso con il no¬ 
me ' Commodore ' o e 'CTRL' (Controllo), 

Ogni tasto ordinario ha, in generale, tre funzioni, rappresentate 
sull'alto e sul davanti del tasto, 

[ tasti ‘lettera* hanno la lettera sull'alto, e due simboli grafici sul da¬ 
vanti. Si ottiene la lettera battendo semplicemente il tasto. Si ottiene 
il grafico di destra premendo simultaneamente SHIFT e il tasto. Si 
ottiene il grafico di sinistra premendo simultaneamente ' Commodo¬ 
re ' c il tastOn 

Quando diciamo "premendo simultaneamente^ ciò significa: premere 
prima sul tasto di comando (SHIFT, c=, CTRL) e mantenerlo schiac¬ 
ciato, premere sul tasto desiderato, lasciarlo, e, fìnaJmcnte, lasciare 
il tasto di comando. Allenatevi alla vostra tastieral 
Su alcuni tasti sono scritti due caratteri (esempio: Q]), Ottenete il ca¬ 
rattere di sotto premendo semplicemente il lasio (esempio: /). Ottene¬ 
te il carattere di sopra (esempio: ?) premendo contemporaneamente 
SHIFT o 'Comodore'. Il tasto [I] ha lo stesso comportamento, ir si ot¬ 
tiene Con SHIFT o 'Commodore', 1 tasti ^ e 0 danno lo stesso caratte¬ 
re se si premono semplicemente, o con SHIFT, o con 'Commodore'. 

I tasti numerici possono essere premuti con il tasto CTRL. Allora si 
ottiene la funzione indicala sul davanti. Descriveremo più avanti que¬ 
ste funzioni. 

Tasti di movimento del cursore 

II cursore è iJ rettangolo lampeggiante che avete sullo schermo quan¬ 
do il C64 attende che battiate qualche cosa: segna la posizione sullo 
schermo dove apparirà il prossimo carattere che batterete. 

I tasti di movimento del cursore spostano tale cursore senza stampa- 
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re caratteri né modificare caratteri già presentì sullo schermo, sui 
quali passa il cursore. 

I tasti » e « creano, evidentemente, il movimento segnato. Il movi¬ 
mento di sopra si ottiene premendo contemporaneamente il tasto 
■Shift'. 

Esempio: (1 che raffigureremo nella forma fa spostare dì mi gradi¬ 
no verso l'aJto. Nello stesso modo, useremo le abbreviazioni seguenti 
per i sìmboli freccia in basso b, freccia a sinistra S, freccia a destra d. 


li!sercÌ/ÌO d'ailenaiileiUo 3.1 


_ Effetluiamo U percorso dallù figura J.Z, 

prendendo cura di tornare al punto À. 


Flg. 3.2. 



Il tasto ' Clr/Home ^ riporla il cursore alla sua posizione di origine ìn 
alto a sinistra dello schermo. 

"Shi fy ’Cir/Home ' riporta il cursore ìn alto a sinistra, ma svuota an- 
clic* la memoria di schermo, cioè sopprime ogni messaggio. Questo 
non va confuso con CLR o NEW: soltanto lo schermo è svuotato, il 
programma e i dati rimangono. 

Il tasto ' Inst/Der sopprime il carattere immediatamente alla sua sini¬ 
stra, permettendo cosi un'immediata correzione degli errori di 
battitura. 

Vogliamo battere BUONGIORNO, ma ci accorgiamo di aver battuto 
BUONKL 

Battiamo una prima volta ' Del ' : BUONK poi una seconda: BUON e 
non ci rimane che da continuare GIORNO. 

Con ' Shift " è la funzione di inserzione quella che otteniamo. 
Vogliamo battere BUONGIORNO, ma ci accorgiamo dì aver battuto 
BUONIORNO. 

Portiamo il cursore sulla I facendo quattro volte ' Shìft ' S : 0. Faccia¬ 
mo ' Shifl' 'Inst/Del ' il che apre uno spazio alia sinistra della posizio¬ 
ne attuale del cursore. Il cursore viene suirultimo spazio aperto ìn 
tal modo: BUON lORNO. 

Non cì rimane che da battere la G: BUONGIORNO. 


l'sci'cizio rii jdleiiaiiieniU) 3.2 


Volevate battere BUONGtORNO e ave¬ 


re battuto BUONORNOr 

Questi ultimi tasti vi serviranno particolarmente per la correzione 
dei programmi. 
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Tasti di controllo del colore 

Queste funzioni si ottengono premendo simultaneamente ’CTRL' e un 
tasto numerico. Il loro effetto è che tutti i caratteri battuti dopo J'iri' 
vocazione della funzione saranno del colore corrispondete^ e ciò fino 
a che non si chiederà un altro colore. 

£sernpio: Se battete ^Ctrl^ REO BUONGIORNO Xtrl' GRN SIGNORA 
avrete sullo schermo BUONGIORNO in rosso e SIGNORA in verde. 
La corrispondenza tra nomi inglesi e colori è la seguente: 


Cifra 

Abrev^iaziortù 

Termine inglese 

Colore otieniito 

1 

BLK 

black 

nero 

2 

WHT 

white 

manco 

3 

RED 

red 

rosso 

4 

CYN 

cyan 

turchese 

5 

PUR 

purple 

porpora 

6 

GRN 

green 

verde 

7 

BLU 

blue 

azzurro 

3 

YEL 

yeliow 

giallo 


NB, Se domandate Ctrl BLU , non vedrete quello che stamperete 
perche i caratteri verranno in azzurro su fondo azzurro* Ma, vedremo 
più tardi che si può cambiare il colore del fondo dello schermo: allo¬ 
ra, 1 caratteri azzurri si vedrebbero. 

1 tasti 9 e 0 non agiscono sul colore. Essi producono ciò che si chiama 
il contrasto invertito (“reverse"): dopo ' Ctrl' ’RVS ON ’, tutto quello 
che batterete apparirà in bianco (colore di fondo generale dello 
schermo) su fondo colorito. Si ritorna al contrasto normale battendo 
Ctrl RVS OFF. 

Esempio: Battete BUONGIORNO Ctrl RVS ON CARA Ctrl RVS OFF 
SIGNORA. Con i tasti numerici danno altri colorfTiassunti nel 
capitolo VL In particolare, 'c=' 7 dà l'azzurro chiaro dei caratteri 
airaccensione. 

Altri tasti speciali 

Abbiamo già visto ì moli di ’ Return ' (ritorno-carrello e fine di mes¬ 
saggio), ^ sbarra d ì s pazio ', ' Run^Sto p' (di cui abbiamo visto soltanto 
la funzione Stop). 

La pressione simultanea di 'Stop' e ' Restore ' rimette il C64 nel suo 
stato alFaccensione, in modo particolare dal punto di vista dei colori, 
e svuota lo schermo- 

La pressione di ' CirL da solo rallenta lo scorrimentp sullo schermo 
quando c'è una stampa rapida. 
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Modo minuscole 

All'accensione, i tasti lettere danno le lettere maiuscole, il grafico di 
destra (con Shift) e iJ grafico di sinistra (con 'Commodore'}. 

Ebbene, esiste un modo nel quale si ottiene la lettera minuscola (con 
il tasto da solo), la lettera maiuscola (con Shift ì e H grafico di sinistra 
(con ' Commodor e'). Abbiamo dunque un comportamento per macchi* 
na per scrìvere^ con possibilità grafiche più limitate (ma rimangono 
tutti i grafici di sinistra). 

Passiamo da un modo airaltn^. e ìnversaraente, premendo simulta¬ 
neamente SHIFT e ' Commodore ". La trasformazione concerne tutto 
ciò che appare sullo schermo. I grafici di destra e le maiuscole non 
possono apparire simultaneamente. 

Domanda: Come avere, sullo schermo, un rettangolo delia taglia di 
un carattere completamente colorato? 

Battete 

' Ctrl" 'Rvs' 'spazio ' 

Per avere la bandiera italiana fate: 

■ Ctrl' ^Rvs' ^Ctrl' ‘CRN' *spa^ ^CtrP 'WHF ^s pazio' XtrV ^RED' 
's pazio '. 

Ripetizione 

l tasti cursore, Inst/Del, e sbarra di spazio hanno la ripetizione auto 
matica, cioè, se li manteniamo premuti, la loro funzione si ripete. È 
specialmente pratico per far viaggiare velocemente il cursore. 

Modifiche e correzioni di un programma 

Quando sì è trovato un errore in un programma, o quando si vuole 
semplicemente apportargli una modifica, è importante poterlo fare 
comodamente, cioè dovendo ribattere meno informazioni possibile. 

Sappiamo giàt 

Aggiungere o inserire una nuova istruzione: basta battere l'istruzione 
attribuendole un numero compreso tra quelli delle istruzioni tra le 
quali vogliamo intercalarla. 

Da ciò risulta immediatamente un consiglio; quando scriviamo la pri¬ 
ma versione di un programma, non bisogna dare numeri consecutivi, 
per poter operare inserzioni in seguito. Si suggerisce, ad esempio, di 
numerare di dieci in dieci. 

Trasformare compìeiamente unistruiione: battiamo la nuova versio¬ 
ne con lo stesso numero della vecchia. Appena battiamo ' Return ' la 
sostituzione ha luogo. 
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Vè^lamo ora nuove possibilità! 

Soppressione compieta di una istmiione: basta battere il numero se¬ 
guito da ’ Return '. 

Ne faremo una prova che cì servirà per il seguito. Supponiamo di 
avere il programma A.l in memoria (altrimentt ribattetelo: è Fastìdio- 
so^ ma vedremo presto come ricuperare un programma senza ribat¬ 
terlo, grazie alle cassette). 

Facciamo un LIST, ma prima, battiamo ' Shift^ 'CIr/Home ' per avere 
il listing in alto sullo scheiino, 

PoL battiamo 30 ' Return ' per sopprimere Tultima istruzione* Verifi¬ 
chiamo con LIST che è stato fatto effettivamente. Non abbiamo più 
l'istruzione 30. 

Per recuperarla, se a seguito di un errore non fosse quella che biso¬ 
gnava sopprimere, dobbiamo teoricamente ribatterla. Ebbene no! 
Non fintantoché Tistruzione è visualizzata. Infatti, se i'i$trtizione è vi¬ 
sualizzata, sta nella memoria di schermo. C'è un modo per trasferirla 
nella memoria pix>gramma: è battere "^Return ' mentre il cursore sta 
ovunque sulla linea de IT istruzione. 

Proviamolo: Portiamo il cursore sulla linea 30 del primo listing; ab¬ 
biamo sullo schermo: 

P 30 PRINT S 

Allora, battiamo ' Return '- Sembra non accadere nulla. Facciamo 
scendere il cursore verso il fondo dello schermo c facciamo LIST: ve-' 
diamo allora che l'istruzione 30 è tornata nel programma. 
Riassumendo, appena sì batte ' Return ^ di fronte ad un tasto che inizi 
con un numertJ d'istruzione, esso diventa un'istruzione nella memo¬ 
ria programma Questo ci servirà per tutte le altre procedure di mo¬ 
difica. E già quello che usiamo per sopprimere un'istruzione: creia¬ 
mo una nuova versione vuota dell'istruzione, e Basic non tiene 
un'istruzione vuota. 

Modifica di qualche carattere su di una linea 

Qui si manifesta tutta la potenza del sistema di editoria del €64* Da 
quello che abbiamo appena visto, risulta che la procedura da osserva¬ 
re è la seguente: 

L Listare la linea da modificare (se non sta già sullo scheiTno). 

2. Portare il cursore sulla linea da modificare e sui caratteri da 
cambiare. 

3. Per ogni carattere da sostituire, battere sul posto il nuovo caratte¬ 
re. Se ci sono caratteri da sopprimere* battere Tnst/DeT , se ce ne so¬ 
no da inserire* usare ' Shjft' Tnst/Pcr . 

4. Quando la linea è nello stalo desideralo, fare '•Return' . 
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Si può modificare una linea in tante tappe ijuante $ì vuole: basta tor¬ 
nare sulla linea per farci altre modifiche dopo aver battuto ' Return* , 

Modifica dei riamerò di una Unea: sì tratta di un caso particolare del 
precedente: ora è il numero di iìnea che cambiamo, ma attenzione! 
Una volta battuto 'Return ' ei sono due lìnee identiche, una al vecchio 
numero e una al nuovo. Questo può essere parlicolarmente prezioso 
per risparmiare il tempo di battitura quando sì ha tutta una serie dì 
linee molto simili da batteteH 
Supponiamo si voglia avere (è un caso didattico): 


Si batterà: 

poij cursore sul 5: 

poi^ cursore sul 7: 


50 GOTO 10 
70 GOTO 10 
90 GOTO 10 
95 GOTO 12 

SO GOTO IO ' Return ' 
7 ' Return ' 

9 'Return' 


poi, cursore sullo 0: 

S (cursore sullo 0) 2 ‘ Return ' 


Ogni volta avremo sullo schermo l'ultima riga battuta,, ma facendo 
LIST ci accorgiamo di possedere tutte le linee desiderate. 


Lsei'cizio 3,3 


Modificare il programma A.l affinché calcoli, non la 
superfìcie del cerchio, ma il volume della sfera di raggio R. 


Diamo l'esercizio non tanto per il calcolo quanto per allenarsi ad ef¬ 
fettuare la modifica. Si vede facilmente che basta cambiare il nome 
del risultato in V (sarebbe possibile mantenere ma vogliamo Identh 
ficatori eloquenti). Quindi 30 deve diventare 30 PRIMT V, mentre 20 
deve diventare 20 V = 4/3*7r*Rl3, 

La modifica di 30 è ovvia, portiamo il cursore sulla S, e battiamo V 
' Return '. 

Per verificare Pìmporianza di ' Return ', battete la V, portate il curso¬ 
re in un luogo vuoto dello schermo e fate ' Return ' solo allora. Facen¬ 
do LIST, vedrete che la modifica non è stata eseguita. 

Per l'istruzione 20, portiamo il cursore sulla S che cambiamo in 
poi, col cursore Su t, facciamo quattro volte 'ShifT 'InsljD el' battia¬ 
mo il 4/3* negli spazi così liberati, poi, col cursore suf2~battiamo 3, 


Domanda: non manca qualcosa?: Sii il ' Retur n'. 

Naturalmente sarebbe staio meglio modificare il programma A,2; è 
l'argomento dell'esercizio 3.4. 


Esercìzio 3.4 


Fare la stessa modifica sul programma A.2, 
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Tutto dovrebbe andare bene» ma la modifica di testi fra apici (SU¬ 
PERFICIE deve pur diventare VOLUME) può creare problemi sui 
quali torneremo in seguito. 


Eserci/ìo tlì alleniuiieiito 


Fare: iì dai prtìgratftma A,2 al 


calcolo del voiume del cilindro (Esercizio 2.1, soluzione in appendice). 


Prima di vedere ì comandi che riguardano le cassette, passiamo ad 
un altro esercizio che ci permetterà di affrontare un altro tipo di 
problema. 


Esci'ci/rio 


Scrivere un programma analogo al programma A.2, ma 
che chieda, questa volta, la superficie di un cerchio e ne deduca il 
raggio. 


li probJema è che, questa volta, non abbiamo una Formula nota da ap¬ 
plicare, 'la pappa non è fatta^ Bisogna cercarìa,^ quantunque non sia 
troppo difficile, per questo esercizio* 

Tuttavia. & cosi sarà per lutti ì problemi tranne quelli toialmente OV’ 
vL il computer non è capace di tix>vare da solo la soluzione di un pro¬ 
blema. Bisogna dargliela sotto fornia di una successione ordinata di 
operazioni da eseguire. Una tale successione, che non è altro che una 
ricetta, si chiama, presso gli informatici sapienti, un algoritmo. 

È quasi sempre più difFìcìLc trovare Paìgoritmo che risolva un proble-- 
ma che non programmare questo algoritmo una volta trovato. 
Torniamo al nostro esercizio. Si trova facilmente che la formula da 
applicare è R — Come tradurremmo la radica quadrata? Ebbe^ 

ne, abbiamo la iscelia, come spesso avviene in programmazione^ tra 
T.5 (potenza 1/2), o richiamare la funzione matematica SQR (radice 
quadrata) che è una di quelle di cui disponiamo in Basic, Donde due 
soluzioni per rìstruzione 20 del programma A.3. 


Programma A.3 

10 INPUT "SUPERFICIE DEL CERCHIO"; S 
20 R = S0R fSM 
30 PRINT "RAGGIO R 
40 GOTO 10 

Altra formula di 30: 

20 R = (S(t) L5 

NB, Nei vari listati di programmi che forniamo^ quello che scriviamo 
Su di una linea corrisponde ad una linea logica che può^ sul vostro 
schermo, apparire su due linee a causa della limitazione dello scher¬ 
mo a 40 caratteri per linea. 
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Archiviazione di un programma su cassetta 

(Se avete a disposizione un magnetofotio, cosa che vivamente vi 
raccoma nd iamo}. 

Eccovi ora dei comandi particolarmente utili, Infatti, Finora abbiamo 
scritto sollanto programmi cortissimi e ne abbiamo scritti pochi. 
Tuttavia, anche così, è Fastidioso batterli più volte, e crea dei rischi 
di errori. Ora, se facciamo NEW, o se spegnamo il C64 sempìicemen* 
te per andate a dormire, il programma è perso (la memoria viva RAM 
perde le proprie informazioni quando non è più alimentata). Fortuna' 
tamente, ci sono le cassette sulle quali possiamo salvare programmi c 
rileggerli in seguito. 

Salvataggio 

Munitevi di una cassetta vergine riawolta (altrimenti riavvolgetela 
con il tasto REW del magnetofono). Notiamo, a questo proposito, che 
è raccomandato usare cassette corte (dati ì tempi di lettura, conviene 
riporre soltanto pochi programmi su ogni cassetta) e di buona 
qualità. 

Supponiamo di avere in memoria un programma prezioso, ad esem¬ 
pio il programma A.3 che abbiamo appena fatto* Piazzate la cassetta 
nel magnetofono del C64 e battete: 

SAVE 'RAGGIO-CERCHIO" 

Il C64 risponde: 

PRESS RECORD & PLAY ON TAPE 

che vuol dire "premete sui tasti RECORD e PLAY (simultaneamente) 
sul magnetofono". Fatelo, Il C64 svuota lo schermo. Al termine, 
visualizza: 

OK 

WRITING RAGGIO-CERCHIO 

Quando riappaiono READY ed il cursore, è terminato: il programma 
è stato scritto sulla cassetta col nome che abbiamo dato. Dobbiamo 
fare due osservazioni: 

1. il nome è Facoltativo, ma È essenziale se vogliamo distìnguere vari 
programmi su di una stessa cassetta. 

2. Quando avrete premuto i tasti del magnetofono che vi indicava, il 
C64 ha risposto OK. Quindi, si è accorto che avevate premuto. Ma 
non distingue bene i tasti, dunque bisogna prendere cura di premere 
tutti ì tasti voluti, soprattutto RECORD. Potremmo anche non mette¬ 
re alcuna cassetta, il C64 crederebbe che Tarchiviazione stia avendo 
luogo! 
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Verifica 

Una volta scritto il programma su cassetta, e possiamo farlo più vol¬ 
le: basta ricominciare il comando SAVE, senza riavvolgere né libera^ 
re i tasti del magnetofono; in tal caso, il Cb4 non chiede di premere i 
lasli, ma mette in moto il magnetofono e si mette a scrivere, bisogna 
verificare il buon esito delToperazione. 

A questo scopo, riawolgete la cassetta, e battete: 

VERIFY “RAGGIO-CERCHIO' 

Il C64 risponde: 

PRESS PLAY ON TAPE 

(siccome vogliamo leggere, non bisogna premere il tasto RECORD 
questa volta). Dopo che il tasto PLAY è stato premuto, il C64 
visualizza: 

OK 

SE ARCHINO RAGGIO-CERCHIO (sto cercando) 
poi^ per ogni programma che troverà, visualizzerà: 

FOUND nome [sto verificando) 

Normalmente, dopo poco tempo, dovremmo ottenere: 

OK 

READY 

Cos'è successo? Semplicemente il C64 ha letto ìJ programma sulla 
cassetta c l'ha paragonato con il programma che aveva ancora in me¬ 
moria, Se questi due sono identici, il salvataggio ha avuto buon esito, 
e stampa OK, 

Altrimenti viene visualizzato il messaggio ?VERIFY ERROR. Allora 
bisogna riavvolgere e riprovare la verifica. Se l'errore si ripete, biso¬ 
gna ricominciare il salvataggio; eventualmente su di un'altra cassetta 
(il programma non è perso, ecco ^interesse dell'operazione VERIFY). 
Se l'errore è persistente, bisogna rivolgersi al servizio di assistenza. 

Caricamento 

Per rimettere in memoria un programma precedentemente registrato 
su cassetta, usiamo il comando LOAD 'RAGGIO-CERCHIO'. 

Il C64 risponde, come per VERIFY: 

PRESS PLAY... 
poi SEARCHINC,,, 

poi FODND... (per ogni programma trovato) 

poi LOADING (quando ha trovato il programma ricercato) 

finalmente READY, 
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Passiamo quindi listaire! il programma a cstìguirLo mediante RUN. 

Se otteniamo il messaggio diagnostico ?LOAD ERROR, dobbiamo 
riawolgere e riprovare^ iwi rifare la prova su dì un'altra cassetta sul¬ 
la quale avremo precauzionalmente eseguito un secondo salvataggìo. 
In caso di falUmento: servìzio di assistenza (spesso sì tratta dì effet¬ 
tuare una regolazione semplicissima). 

NB . I messaggi citati appaiono soltanto alla fine poiché, durante il 
funzionamento della cassetta^ Il C64 svuota lo schermo. 

Nomi abbreviati 

Possiamo specificare un nome abbreviato rispetto a quello specifica* 
to al momento del SAVE. Ad csernpìo, avremmo potuto scrivere;; 

LOAD *RA- 

11 C64 caricherà il primo programma incontralo sui nastro dal nome 
compatibile con l'abbreviazione. Esempio, se prima di RAGGIO- 
CERCHIO c'è un programma RADIO sul nastro, verrà caricato 
RADIO. 

È anche possibile non specificare alcun nome e scrìvere LOAD e ba¬ 
sta, In tal caso, viene caricato il primo programma incontrato sulla 
cassetta, 

Caricametito ed esecu3tloiie riuniti 

Se si premono simultaneamente i tasti 'ShifC e 'Run^Sto p', sì ottiene 
Tequivalente della sequenza di comandi LOAD e RUN, cioè viene cari¬ 
cato il primo programma incontrato sulla cassetta e viene subito lan¬ 
ciata la sua esecuzione. 

RICAPITOLAZIONE 

Ormai abbiamo visto le più. fondamentali istruzioni dei programmi: 

aritmetico 

INPUT-PRÌNT 

GOTOEND 

Abbiamo visto i comandi più utili: 

RUN e LIST 

SAVE, VERfFY e LOAD 

come Je procedure di correzione dei programmi. 

Se renunciato di alcune delle parole-chiave precedenti non risveglia 
m voi alcun ricordo, vi consigliamo, prima di proseguire, di rileggere 
le pagine che le riguardano- 
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()m •iiatrto pronti per ailroniare Iti seconda serie di programmi che t'i 
permetterà — sempre per varianti successive — di accrescere il nostro 
'arsenale' di IstrtAlioni Basic. 







t. 



Capitolo ^ 

Basi della programmazione 


non avete nulla in contrario, faremo un gioco. I programmi di gio¬ 
chi formano una categoria importante dei programmi per piccoli si¬ 
stemi. Non sono tutti folli: alcuni sono molto elaborati e spesso dìver' 
lentissimi. Inoltre, la presentazióne sotto forma dì gioco dì certi pro¬ 
grammi pedagogici lì l'ende più attraenti e quindi più efficaci. Desi¬ 
deriamo che. al teiTnine della lettura di questo libro, siate capaci, an¬ 
che voi, dì scriverne. 

Per il momento, il nostro gioco sarà un po' semplice in partenza, ma 
migliorerà progressivamente. Si tratta del gioco 'indovina un nume¬ 
ro". Il programma conosce un numero (fisso) e legge il tentativo del 
giocatore; se il giocatore ha Indovinato, stampa "vinto", altrimenti 
stampa 'perso'^ 

L’istriizione IF 

Per realizzare quanto richiesto^ dì che cosa abbiamo bisogno? Di una 
istruzione capace di testare una condizione (che qui sarà numero da¬ 
to dal giocatore = numero nascosto), cioè di valutare se è vera o falsa; 
se è vera, di andare ad un certo punto del programma (in questo caso 
stampare 'vinto') altrimenti dì andare ad un altro punto del program¬ 
ma (in questo caso, stampare "perso"). 

Ebbene, questa istruzione esìste, è l'istruzione IF. La sua forma prin¬ 
cipale è: 

n IF condizione THEN istruzione 
n' IF... 

Il comportamento è questo: se la condizione è vera, si effettua l'ìstru- 
zione che segue THEN, poi l'istruzione deJla linea successiva n'; se la 
condizione è falsa, si passa direttamente airistruzione della linea 
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Un caso particolare: si presenta quando l'ìstnjzjone che segue THEN 
è un GOTO: ^ jp condizione THEN GOTO n" 


n 


n 




Allora, se la condizione è vera, si va in n'’: se la condizione è falsa, si 
va in n'n 


In pratica basta scrivere una delle due parole THEN e GOTO: 


Esempio: 


10 IF A = B THEN 50 
20 ìF A + B<C GOTO 100 


Siamo pronti per scrìvere la nostra prima versione del programma 
'indovina un numero". 


PROGRAMMA B.l 


26 INPUT''INDOVINR UN NUMERO Sft 
30 IF n*3.25 GOTO €6 
40 PRINT"PERSO I" 

50 END 

60 PRINT"VINTO" 

Le istruzioni INPUT e PRINT ci sono già familiari. LTstruzione END 
fa terminare il programma una volta scritto PERSO! Non ce n'è biso' 
gno dopo 60 poiché è Tultima istruzione del programma. 
L'istruzione IF che usiamo è del terzo tipo: IF... GOTO. Il numero da 
indovinare è 3.25; il numero proposto alla tastiera è A; la condizione 
da testare è “A è uguale a 3.25?"' Ebbene, si scrive A = 3.25. È 
semplice. 

Dal punto di vista del lunzionamento del gioco, sono tante le obiezio¬ 
ni da formulare sul programma Bd. Lo ifaremo presto^ c ci sarà di 
aiuto per scoprire nuove istruzioni Basic. Ma la forma attuale ci ba 
permesso dì usare ristruzione IF^ che È una delle pìù importanti del 
Basic^ e dobbiamo ancora vedere alcune cose a proposito di questa 
istruzione, in particolare, le diverse istmzioni che possono seguire 
riF. 

La prima forma di condizione è: espressione aritmetica relazione 
espressione aritmetica, come 2*A-l-4 <Bt3. 

Ogni espressione aritmetica viene valutata prima di esaminare la re¬ 
lazione. Gii operatori dì relazione che sì possono usare sono; 

= uguale < > diverso 

< minore < — minore o uguale 

> maggiore > = maggiore o uguale 

"diverso" si scrìve "minore o maggiore", abbastanza logicamente. 
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La seconda forma di conditone è una combinazione di relazioni della 
prima forma mediante gli operatori logici AND (e), OR (o) e NOT 
(non). 

CI AND C2 è vera solo se le condizioni Cl e C2 sono entrambe vere. 
Cl OR C2 è vera non appena è vera una almeno delle condizioni Cl 
e C2, 

NON C è vera se C è falsa, e falsa se C è vera. 

— Andare In 100 se coniemporaneamente C è maggiore di 2 * A + 4 e 
B è minore di 

IFC > 2* A + 4 AND B< 3 GOTO 100 

— Stampare SI se X è fuori dalt'intervallo [l, 2[ (cioè X < 1 o 
X > = 2): 

IF X < 1 OR X > = 2 THEN PRINT "SI" 


Riprendete i7 programma A3. Provate a fornire una su¬ 
perficie rtegiitiva. 

Sì ottiene H messaggio.^ 

PILLEGAL QUANTfTY ERROR IN 20 

cosa normale, dato che si cerca di calcolare la radice quadrata dì uri 
numero negativo: noti esiste un cerchio di superfice negativa. 

Un programma scritto bene deve garantirsi contro tali errori dell'ope¬ 
ratore: ad esempio, un programma di scacchi deve verificare che il 
Colpo proposto dal giocatore sia legale. 

Lo scopo delUeserciiio è dì immettere una tale garaniia nel program¬ 
ma A.3r Aggiungete al programma un'istruzione che rimandi in 10 per 
chiedere un'altra superfìcie fintantoché la superficie fornita non ^ po- 
Si può pure, inoltre, stampare un messaggio di protesta. 

Adesso abbiamo visto la nostra prima istruzione veramente elabora* 
ta. Infatti^ rende capace il C64 di prendere decisioni in funzione delle 
varie situazioni che possono risultare dai dati. In realtà, le declsiorii 
le prendete voi quando preparate il programma, e se per caso dimen¬ 
ticate un caso possìbile, il programma si comporterà scorrettamente 
se il caso si realizzerà. 

Di decisione in decisione, il cammino può ramificarsi in modo 
complesso. 

Gli schemi a blo cchi , detti anche org ani g rammi , possono divcntaiie 
necessari per raccapezzarsi. 

Prima di passare al miglioramento del nostro programma di gioco, 
studieremo lo schema a blocchi del programma B.l. 
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È composto di blocchi, che specificano le varie operazioni, collegati 
tra loro da frecce che rappreseniano Tordi ne di successione delle 
operazioni. La forma stessa del blocco indica al primo sguardo la na¬ 
tura del Topo razione. 

Tra le forme del blocco, si distinguono essenzialmente: 

— il rettat^goìo, che ha una sola entrata ed una sola uscita e rappre¬ 
senta qualsiasi operazione Imperativa; 

— il rombo, che ha una sola entrata, ma due o più uscite, e i-apprc- 
senta le operazioni di test. 

Si usano i segni speciali Q e ® per segnare rinìzìo e la fine del 
trattamento, * 

È sempre raccomandabile tracciare lo schema a blocchi prima di in¬ 
traprendere la redazione del programma: non è mai una perdita dì 
tempo. 


Tracciare h schema a blocchi del programma AZ 
Tracciare lo schema a htoccki de! programma delTesercizìo 4d. 


A quali parole-chiave Basic viste firiora corrispondono 
i blocchi o segni: 



Perfezionamento del programma B 

Bisogna pur ammettere che^ nella sua prima versione* il gioco non è 
particolarmente interessante. Ma siamo ora in grado dì migliorarlo. 
La prima obiezione non sarà risolta se non proprio alla fine. È un 
peccato perché riguarda ia credibilità stessa del gioco^ 
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Infatti, basta battere LIST per avere la lista del programma, e venire 
cosi a conoscenza del numero da indovinare. Supporremo per un po' 
che il giocatore non conosca il comando LIST, oppure che stia al 
gioco. 

Dobbiamo notare che questa obiezione si presenta pure, anche in pro¬ 
grammi più elaborati: ad esempio, se giocate alla battaglia navale col 
computer e $e conoscete bene il programma, potete far stampare le 
vai'iabili che contengono le coordinate delie navi avversarie. 
Supponendo ora che giochiate senza barare, obietterete che il gioco è 
dìfricilissimo, addirittura non equo: avete poche possi bili là dì trova¬ 
re il numero al primo colpo, come esige il programma, È chiaro che 
bisogna lasciare al giocatore più possibilità. 

Lo sì può fare molto semplicemente: basta sostituire l'istruzione 50 
del programma B.l con 50 GOTO 10 ed ora abbiamo diritto ad un nu¬ 
mero illimitato di tentativi. 

Malgrado ciò, li gioco rimane assai aleatorio per due motivi: 

— in caso di errore, nulla dice al giocatore se è lontano o vicino dal 
risultato: 

— il giocatore deve azzeccare proprio il valore giusto, cioè deve for¬ 
nire il numero con la precisione con la quale lavora il C64, cioè 10“’. 

Risolveremo i| primo problema calcolando e stampando ogni volta la 
percentuale di errore E uguale al numero proposto meno il numero 
da trovare diviso il numero da trovare, il lutto moltiplicato per cento. 
La percentuale di errore verrà stampata in valore assoluto, dunque 
senza indicare il senso deirerrore, per lasciare al gioco una certa 
difficoltà. 

Per quanto riguarda l'errore possìbile dovuto alla mancanza di preci¬ 
sione del personal non si confronterà il numero proposto con il nu¬ 
mero da trovare, ma si considererà la risposta esatta se E, percentua¬ 
le d'errore, sarà minore di 0,5%. 

Il problema di precisione si pone ogniqualvolta si hanno calcoli da ef¬ 
fettuare. Per risolverlo, basta sostituire un test di eguaglianza pura 
del tipo IF A = B con un test sul valore della differenza tra ì due nu¬ 
meri del tipo A-B < soglia, dove la soglia è Lordine di grandezza della 
precisione — o piuttosto deirimprecisionc — del C64. In realtà è il 
valore assoluto della differenza che si dovrebbe testare. Il nostro pro¬ 
gramma diventa: 

PROGRAMMA B.2 

20 INPUTnNDOVìNp UH NUMERO^' 
za E-100i»iRBS<FI-3.2-55^3,23 
30 IF E<0.3 GOTO £0 
40 PRINI"ERRORE";£;"K" 

50 GOTO 20 
60 PRmT'VIHTOI" 
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Nella linea 25, usiamo la funzione ABS (valore assoimo) che fa parte 
della biblioteca matematica del Basic del C64 la cui lista completa è 

data in appendice. . . ■ 

Se facciamo girare 11 programma cosi com'è, otteniamOp ad esempio, 

il messaggio: 

ERRORE 107692308% 

È ben certo che non sappiamo che farcene dì tante cifre decimali. Co¬ 
me toglierle? Useremo un'altra funiione della biblioteca, la funzione 
INT, che prende la parte intera dell'argomento messo tra parentesi. 
Sostituiamo^ nell’istruzione 40, E con IHT(E). Questa volta, otteniamo 
una percentuale intera^ Ma è troppo poco. Come fare per ottenere, 
mettiamo, due cifre decimali? 

A questo scopo, moltiplichiamo E per 100 per far passare le due ciirc 
decimali che vogliamo tenere nella parte intera, prendiamo lo INT di 
questo prodotto, che fa sparire le altre cifre decimali, poi ridividia¬ 
mo per 100: 

INT(E*100)/100 

Tale è l'espressione che viene a sostituire E neH'istruzione 40 del pro¬ 
gramma B.2, ed abbiamo ora un messaggio soddisfacente. 


i-.sei'cì/Ì4,> 4,4 


Vogliamo siampare il numero X con D cifre decimali. 


Scrivere distruzione cornspondenTe in modo diretto 


Per costituire la versione 3 del nostro programma, vogliamo aggiun¬ 
gere un altro perfezionamento. Sebbene gradevole, quando il numero 
da indovinare è stato trovato, stampare il numero dì tentativi che sch 
no stati necessari. Si tratta, in pratica, dei punteggio del gioco. Per 
questo introduciamo una nuova variabile N, alla quale sommiamo I 
ogni volta che un tentativo è stato fatto senza successo, e che stam¬ 
piamo alla fine; ed ecco il programma B,3: 

PROGRAMMA B.3 

20 INPUT"! UBO VINR UN NUMERO" J 1=1 
25 E*100»BBSCR-3i£5>/3.25 
30 rp E<0.5 OOTO 6B 
33 H-N+l 

40 PRINT"ERRORE" ; INT<Et*i100>^100^ 

30 GOTO 20 

S0 PRINT"VINTO IN";N+1;"TENTATIVI" 

1/istruzione J5 può sembrare paradossale, ma non dimentichiamo 
che il segno = non ha in Basic lo stesso significato che in matemati¬ 
ca. In Basic, vuol dire: calcolare l'espressione che sta a destra, quindi 
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N + l, e mettere LI risultato nella variabile che sta a sinistra, OuÌ, é la 
stC!>$a variabile, cosa perfettamenie lecita, e questo è effettivamente 
come incrementare 

Dauianda: La primissima volta che si incontra Vistruzione 35, si deve 
calcolare t'espressione N + tonale valore si prende per N? 

Fate bene a porre questa dOTtianda che solieva il problema delFiMtsia- 
Hz^J^zione delle variabili. Ma sappiamo che quando facciamo RUN, 
Basic azzera tutte le variabili, quindi anche N* Ora, quando comincia¬ 
mo, abbiamo fatto 0 tentativi, dunque il valore Iniziale automatico dì 
N è adeguato. Se, in un altro problema, avessimo avuto bisogno di un 
altro valore iniziale che 0, allora si sarebbe dovuto fornirlo esplìcita- 
mente nelle prime istruzioni del programma; questo è un punto fon¬ 
damentale; parecchi programmi falliscono per una scorretta inizializ- 
zazione di certe variabili, 

Motiamo infine, nella linea 60. che si stampa N + l e non N: questo 
per mettere in conto Fukimo tentativo, poiché quando il nunieix> è 
esatto, non si passa dall'istruzione 35, 


Lsci'cizio 4,5 


Come far stampare lo stesso N nella linea 60? 


I cicli FOR.., NEXT 


Possiamo ora affrontare un altro difetto del programma nel suo stato 
attuale: esso permette un numero illimitato di tentaiivL È troppo, na¬ 
turalmente, Dobbiamo autorizzare vari tentativi, ma in numero limi¬ 
tato, ad esempio 5 o IO. 

Lo si può fare molto semplicemente. Infatti abbiamo, in ogni momen¬ 
to, una misurazione del numero di tentativi fatti fino a quel punto: è 
la variabile N che basta testare. Sostituiremo, per farlo, l'istruzione 
50 con la sequenza: 

45 IF N < 10 GOTO 20 

50 PRINT 'MI DISPIACE, HAI PERSO" 

55 END 

ne segue tl programma B.4A: 

PROGRAMMA B,4A 


20 IHFLT'IHDOVINR UH NUMERO”; FI 
25 H«iee#FlBS<fi-3*255/3.23 
30 IF E<0*3 OOTO 60 
40 PRIHT"ERRURE 

50 PRINT-MI DISPIRCE.Hftl PERSO" 

55 END 

60 PRIHT"VINTO IH” ; N+1 ; "TEHTRTIVI " 
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Disegnamo lo schema a blocchi corrispondente, senaa dettagUarlo 
troppo: 



Se semplifichiamo ancora questo schema a blocchi per farne risalta¬ 
re Tossatora, otteniamo: 



Questa struttura, molto classica, fc del tutto fondamentale dato il suo 
uso universale; si chiama ciclo. Ma contrariamente ai cicli che abbia^ 
mo visto airinizio, in questo caso, il numero di iterazioni è limitato a 
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priori: N le veci di contaiore dei passaggi sulle operazioni da ripe' 
lere; gli si dà un valore iniziale, poi si effettua il trattamento da ripe¬ 
tere per i successivi valori di N fintantoché il limite non è superato. 
Il programma B,4A ci prova che si possono realizzare cicli, in modo 
del tutto soddisfacente, con le istruzioni che conosciamo già. Eppure, 
data l'importanza dei cicli. Basic offre un gruppo di istruzioni specia- 
li che permettono di inserirli ancora più Facilmente. Si tratta dell'in¬ 
sieme FOR... NEXT usato nel programma B.4B. 

Si vede quanto sia facile usare tali cicli: basta inquadrare le istruzio¬ 
ni da ripetere (da 20 a 40 nel nostro esempio! con FOR e NBXT. 

PROGRAMMA B.4B 

10 FOR M-1 TO 10 
2Q INPUT MNEOVINR UN NUMERO'^JR 
25 £-100iltRBS<R-3*2S>y3.25 
30 IF EC0.5 GOTO 60 
40 PRINT''ERRORE';EJ "fi ' 

45 NEXT N 

50 PRINT -MI mSPIfìCE^HRI PERSO" 

55 END 

60 PRINT ’VINTO IN "iN+l;' TENTRTIVI" 


— in testa, un'istruzione FOR, della forma: 

FOR N = valore di inizio TO valore limite 

o, in italiano: 

per N = valore di inizio fino a valore limite; 

— in coda, ristruzìone NEXT N che significa passare al successivo 
N. Essa incorpora quindi sla l'incremento di N sia il test... 

Ovvio, no? 


ICsci'cizÌ4> 4,6 


Stampare una ìabelta dei ifuadrati e delle radici qua¬ 
drate dei numeri da t a 10. 


L'istruzione da ripetere è di stampare, sulla stessa lìnea, un numero 
N, il suo quadrato c la sua radice, ossia: 

20 PRINT N; NT2; $QR(N) 

Questo bisogna farlo per tutti i valori dì N da t a IO. Ossia: 

10FORN = 1 TO IO 
c non bisogna dimenticare di terminare con: 

30 NEXT N 
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Kscixì/iiì 4.7 


manca? 


Inserire le isfruzioni precedenti, e far eseguire. Cosa 


(Indicazione: non riguarda il ciclo). 


Estensioni di FOR.*. NEXT 


La forma che abbiamo appena visto non è che un caso particolare 
della forma più generale: 

FOR N = valore di Inizio TO valore limite $TEF passo 

STEP annuncia ì! passo d'incremento del contatore. Si mette 2, ad 
esempio, se si vuole che N cresca di 2 in 2: 


l'esercizio 4.K 


__ v&gitamo fare 

sctìtanto per i valori di N pari. 


Se non mettiamo STEP e un passo, Il C64 sottoiniende un passo ugua¬ 
le ad uno. 

I valori degli estremi possono essere qualsiasi e ìl passo può essere 
negativo. Ad esemplo^ se volessimo fare la stessa tabella di priiTta, ma 
cominciando da 10, poi 8 ecc .. scriveremmo: 

IO FORN = 10TO 1 STEP—I 

Non è obbligatorio mettere costanti come estremi: si possono mette* 
re variabili, o anche qualsiasi espressione aritmetica- Ma le espressìO' 
ni vengono valutate una volta per tutte quando sì entra nel ciclo> an¬ 
che se l'esecuzione del ciclo provoca un'evoluzione nelle variabili che 
intervengono. Questo si usa soprattutto nelle scritte della forma: 

FOR I = 1 TO N l 

o 

FORI = 1 TO N STEP 2 

II valore limite che diamo è il valore che non verrà superato per l'ese¬ 
cuzione del ciclo: il test si svolge esattamente come nello schema a 
blocchi del programma B.4A: il contatore viene modificato e si testa 
se è ancora compreso tra gli estremi; se lo è, si riesegue il ciclo, se no^ 
abbiamo terminato, e il contatore ha un valore fuori dagli estremi. 


lascici/io 4.9 


Per <iHaìi valori del contatore vengono eseguiti i cicli 
seguenti, e qua! è il valore finale del contatore? 


10 Fani=ì TOS.5STEP2 

50 FOR M-IOTO J.5 STEP —/ 


Il trattamento da ripetere per un ciclo può contenere lui stesso un ci- 
do. Si dice che si hanno cicli indentati. 
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ICsL>i'i'ì/ì^) 4Jy 


_ Si vuole tracciare una rateila dei numeri da f a 12 

con i loro quadrati ma con quattro coppie per linea. 

Una soluzione è: 


10 FOR 1 = 1 TO 9 STEP 4 
20 FOR J - 0 TO 3 
30 PRINT I + J; (I + J)*(I + J), 

40 NEXT J 
50 NEXT I 

Il secondo ciclo deve essere completamente contenuto airinterno del 
prìmo^ 


- FORI 

p FOR J 

è corretto 

I— NEXT J 
- NEXT I 


|— PORI 
-FOR J 

è scorretto 

L- NEXT J 
- NEXTI 


Nota: Se in 30 si scrivesse PRINT 1 + J: (I + J)t2, la stampa sarebbe 
turbata dal fatto che si troverebbe; 

71 = 49.0000001 e 9^=81.0000001 

Perché? Ebbene perché Pinterprete calcola nella forma: senza 

distinguere casi particolari per y = 2. dal che seguono i suoi errori dì 
arrotondamento. 

Si vede in questo caso una delle cause d'inefficienza degli Interpreti, 
mentre un programmatore in linguaggio macchina tiene conio del ca¬ 
so particolare che incontra, e sostituisce la potenza 2 con una molti¬ 
plicazione! più veloce. 

Sì può omettere la ripetizione della variabile che serve come contato¬ 
re nel NEXT. Così, nelrescrcizìo 4.6. si sarebbe potuto scrivere 30 
NEXT. e nel 4J0. 40 NEXT; 50 NEXT — e il problema delFordine 
non si poneva più. 

Nell'esercmo 4.10, avremmo potuto sostituire 40 e 50 con 45 NEXT 
J, I (attenti all'ordine). 

Con la coppia FOR.., NEXT, abbiamo appena aggiunto al nostro arse¬ 
nale uno degli strumenti più efficaci del Basic. Ci rimangono da vede¬ 
re due altri elementi base per i quali torniamo al nostro programma 
di gioco. 

L^orologio tempo reale 

Ciò che manca nel nostro gioco attualmente, è lo “sport". Certo, il gio¬ 
catore ha diritto ad un numero limitato dì tentativi, ma sarebbe mol¬ 
to più spettacolare se il tempo concesso per indovinare il numero giu¬ 
sto fosse limitato. 
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Il C64 il necessario per questo. Infattip possiede un orologio tempo 
realcp e del resto è attualmente uno degli unici mìcrocomputer di 
quella categoria di prezzo che abbiano un tale orologio. 

Ma cos'è un orologio tempo realfij^ e a cosa serve? Maturalmente, un 
orologio è fatto per dare Toraj. ma come si procede? 

Nei caso dei C64 l'oroiogio si comporta come una casella dì memoria 
che si può leggere (è in questo modo che sì ottiene l'ora)> ma taie ca¬ 
sella di memoria ha un comportamento un po' particolare: ogni sc- 
santesimo di secondo, il suo contenuto è aumentato di uno da un pro¬ 
cesso esterno al microprocessore, che fa intervenire un oscillatore, 
divisioni di frequenza e interruzioni, e di cui non dobbiamo 
preoccuparci. 

Tutto quello che dobbiamo sapere è che esiste una variabile (riserva¬ 
ta) particolare, TI, che vaie 0 all'accensione e che, in seguito, ha per 
valore il nuniero^di sessantesimi di secondo trascorsi dal l'ultima 
accensione. 

Proviamo il programma: 

10 ?Tl 

20 GOTO 10 

Vedrete un messaggio che non smette di variare, poiché il numero 
viene aumentato di I sessanta volte al secondo* 

Le possibilità offerte da questo orologio tempo reale sono molto nu¬ 
merose. Infatti, se scriviamo: 

10 TI =TI 
SO T3 = TI 

allora T2-T1 è proporzionale a li'intervallo trascorso tra J'esecuzione 
di 10 e l'esecuzione di SO: abbiamo dunque una misurazione di tale 
intervallo (per averla in secondi, basta dividere T2-TI per 60). 

Si può, al contrario, generare un intervallo di tempo: supponiamo 
che tra le istruzioni 10 e 20 si voglia attendere un minuto, si scrive: 

10 „, 

15 T-Tl 

16 IF TI-T <3600 GOTO 16 

20 „. 

In 15, si fìssa l'istante di inìzio nella variabile T. Poh in 16, TI rappre¬ 
senta l'istante attuale. TI-T è l'intervallo trascorso tra 15 e l'esecuziO' 
ne attuale di 16: esso cambia ogni volta dato che il tempo passa. Fin¬ 
tantoché rintervallo di tempo è minore di 3600 scatti =60 secon¬ 
di = I minuto, si riesegue 16. Ma ^intervallo cresce senza pausa: fi¬ 
nirà con l'essere di un minuto, e allora si passerà a 20. 

Va bene> ma come avere l'ora nella forma usuale? Si fa appello ad 
un'altra variabile riservala del C64, TI$ che, come vedremo più tardi 
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è una variabile stringa di caratteri (il suo nome termina con $), Essa 
contiene rora sotto forma di una strìnga di t caratteri^ della forma 
hhmmss: 

?TI$ farà stampare, ad esempio, 10230S se sono le ore 10, 23 minuti, 
03 secondi. 

Ma, per questo, bisogna mettere il Có4 airora giusta, altrimenti con¬ 
sidera che alTaccensione sono le ore 0, 0 min. 0 s. 

La regolazione dell'ora si fa con un assegnamento del tipo: 

TI$ = '101000" per dire che sono le ore 10 e 10 min. 

Una volta che abbiamo Torà in questo modo, possiamo chiedere al 
C64 di accendere una lampada ad una certa ora e di spegnerla un po' 
più tardi. Gli possiamo chiedere di togliere la corrente m tutti gli uf¬ 
fici dopo le 18, ma dopo le 12 al sabato, e pure di tenere conto dei 
giorni festivU 

Sarà quindi questo orologio tempo reale a servirci per limitare il 
tempo concesso al giocatore. 

Come? E semplicissimo. Annoteremo, all'inizio del gioco, l'ora nella 
variabile T: 

5 T = T1 


poi, ad ogni tentativo del giocatore, testeremo se il tempo non è 
superato: 


Msi.'rct/ìn I 


15? 


15 IF (Tl T)^é0> 120 GOTO 50 
Qual è il tempo concesso aì giocatore dall‘isirazione 


SI giunge quindi al programma B.S. 

PROGRAMMA B.5 


5 T*-TI 

10 FOR N*-t TO le 
15 IF <TI-T)/e0>120 GOTO 50 
20 INPUT' INBOVINR UN NUMERO*'; fi 
23 E*103iltfiBSCp-3*25>/3,25 
30 IF EC0,3 OOTO 60 

40 priht'‘errore";e; 

,^5 NEXT N 

50 PRINT"rH DISPIACE* HfiI PERSO*' 

53 END 

-60 PRINT "'VINTO IN'’ÌN; "TENTATIVI E* ; INT< <TI-T>/e0>; “SECONDI 


Abbiamo pure incorporato nella lìnea 60 la stampa del tempo impie¬ 
gato dal giocatore per trovare la soluzione. 
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Rsorcì/io 4,12 


Ricostruire h schema a blocchi del programma BS 


RseicÌKÌt> 4,13 


_ Modificare Vistruztone 60 per stampare il tempo al 

I/lOOmo di secondo (come per le gare di sci). 


Rimaot da apportare un piccolo perfezionamento: quando stampia¬ 
mo '■perso', sarebbe un bene distinguere se sì tratta dì superamento 
del tempo o di numero troppo grande dì tentativi. È lo scopo 
dell'esercizio seguente. 


Fsereì/io 4.14 


Quando il giocatore ha perso^ stampare la causa del 
fallimento, tempo o mimero di tentativi.^ 


Istruzione STOP, tasto 'ST OP ', comando CONT 


li nostro programma di gioco è ormai giunto ad un buon livello di 
complessità. Di conseguenza, possono presentarsi difficoltà per effet¬ 
tuare la messa a punto. Come ci aiuta a risolverle il C64? 
il primo strumento è costituito dai messaggi d'errore stampati dal 
C64 in caso di situazione anormale. Ad esempio, se mai richiamaste 
la funzione SQR con un argomento negativo, avreste il messaggio: 

?1LLEGAL OUANTITY ERROR IN numero d istruzione 

poi, READY viene visualizzato, il che indica che il C64 è pronto ad ac¬ 
cettare un comando in modo diretto. Notiamo, anche qui, che il co¬ 
mando occupa due linee. 

Il comando diretto più giudizioso da inserire in un caso simile è 
FRI NT certe variabìlL Infatti nel caso di un'interruzione dì questo ti¬ 
po, tutte le variabili dei programma sono conservate, potete quindi 
chiedere la loro stampa in modo diretto. Ad esempio, se la nostra ra¬ 
dice quadrata ad argomento negativo dipende da una variabile X, 
batteremo ?X. Allora vediamo che X non ha il valore che prevedeva¬ 
mo. Possiamo chiedere allora il LIST deiristruzione che calcola X. 
Vediamo quindi che manca un'operazione, e siamo pronti a corregge¬ 
re distruzione. 

Attenzione, dal momento in cui operiamo la minima modifica sul prò 
gramma, le variabili non sono più conservate. Ci conviene quindi esa¬ 
minare più variabili possìbili prima di iniziare le correzioni. 

Tale è lo svolgersi abituale della correzione degli errori. I messaggi 
di errore sono listati in appendice, con un tentativo di analisi delie lo¬ 
ro cause più frequenti. 

Il procedimento è diverso se non si presenta alcun errore che susciti 
un messaggio mentre i risultati sono sbagliati. Come fare in tal caso? 
Allora suddivideremo il programma in pìccole tappe, tra le quali in¬ 
seriremo istruzioni STOP. Ad esempio, se un programma ha due tap¬ 
pe, la prima da 10 a 50 e la seconda da 60 a 150, intercaleremo un 55 
STOP. 
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Quando si arriverà in 53, il C64 stampcrài 

BREAK IN 55 
READY. 

e si fermerà. 

Notiamo già che il fatto di ottenere una stampa tale significa che La 
prima tappa si è svolta fino in fondo. Correttamente? Per saperlo, 
poiché il C64 è fermo, vi basta chiedere la stampa diretta delle varia* 
bili strategiche. 

Supponiamo che lutto sìa corretto. Vorremmo ora éseguire la secon¬ 
da tappa. Ebbene, per fare questo, disponiamo del comando CO NT . 
che vuol dire "continuate, ora ho fatto quello che volevo al momento 
dell'arresto'. Attenti, non potete usare CONI se, durante l'arresto, 
avete modificato il programma. 

C'é ancora una cosa possibile. Supponiamo che, nell'esempio qui so¬ 
pra, non otteniamo mai il messaggio BREAK IN 55. Ciò significa che, 
durante la prima tappa, il programma entra in un ciclo senza fine. 
Come sapere a che punto siamo? Basta premere il tasto ’Run/Stop' 
(senxa "SHIFT'). Questo tasto simula un'istruzione STOP nella linea in 
corso di esecuzione al momento in cui si preme: otteniamo il messag¬ 
gio BREAK IN 25 {ad esempio). Rilanciamo l'esecuzione mediante 
CONT. L'esame di qualche variabile e un listing della zona del pro¬ 
gramma indicato dal BREAK IN permettono, normalmente, di scopri¬ 
re l'errore. 

Infine, un ultimo strumento di soccorso è semplicemente di aggiun¬ 
gere, ad intervalli regolari, la stampa delle principali variabili; ba¬ 
sterà poi, quando il programma sarà messo a punto, sopprìmere le 
istruzioni di stampa superflue. 

Domanda: qual è la dtffeTVH!:a fra STOP e END? L^urtlca differenza, è 
che STOP fa stampare il messai^^io BREAK !N... mentre END non lo 
fa. Si può pure ricominciare con CONT dopo un istruzione END, 


RICAPITOLAZIONE 

Questo capitolo ci ha permesso di vedere gli strumenti base del 
p rog rum ma tore: 

— le istruzioni fondamentali ÌF e FOR: 

— la manipolazione delVotoiogio tempo reale del C64; 

— qualche aiuto alla messa a punto dei programmi. 

Siamo ora pronti per affrontare le tecniche elaborate di program¬ 
mazione. 



I 

t 





Capìtolo D 

Programmazione evoluta 


lstnj;£Ìoiiì DATA, READ e RESTORE 

Il nostro programma di gioco ci condurrà ora a tecniche più sofisti¬ 
cate. Supponiamo che sii voglia giocare in tanti. Quindi ora abbiamo 
bisogno dì una stringa dì numeri da indovinare, [nfattì, se i! giocato¬ 
re n. 5 ha visto che ì due precedenti dovevano indovinare 3.25, non 
dovrà spremersi troppo il cervcllol II programma B.6A dà una soJu- " 
^ione. Per semplificare abbiamo soppresso il limite sul numero dì 
tentativi autorizzati ma, naturalmente, abbiamo lasciato la limitazio¬ 
ne nel tempo. 

Attenti: se avete lasciato in memoria il precedente programma B.5, vi 
conviene cancellai’e !a memoria con il comando NEW prima di batte¬ 
re il programma qui sotto. Infatti abbiamo rinumerato le linee e I1n- 
serimcnto sovrapposto di B.6A su B.5 dà un "caos' inintelliggibile. 
Questa rinumerazione ha lo scopo dì ridare un po' di aria al program¬ 
ma per permettere future aggiunte e modifiche, 

PROGRAMMA B.6A 


10 PERD C 
20 T“T1 

30 XF TX-T>720@ GOTO 90 
40 INPUT'CHE NUMERO PROPONI" 

50 E-ieOi*iftBS<fì-C>/C 
€0 IF E<0.5 GOTO 110 
70 PRINT "ERRORE " JINT<E*10O?/100; "K" 
00 GOTO 30 
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90 PRINT"TROPPO TflRDt’ CEDI IL TUO POSTO fiL GIOCPTORE 

SUCCESSIVO" 

100 GOTO le 

110 PRIHT'VINTO rH'MNT<<TI-T>/,6>/100; "SECONDI'' 

120 GOTO 10 

£00 DRTfì3*2!5.7*e^.2. 121.449,0.075, 13 
210 DRTfl5.e,210,78,3lj901*S,31.4,19,2.7 


Due nuove islni^ìoni appaiono in questa versione: RPAD e DATA. 

DATA serve semplicemente per specificare una lista di costanti sepa- 
rate da virgole: ristrurione DATA viene considerata soltanto in reìa' 
zione con una istru/.ione READ; altrimenti è "irasparente" per il 
programma. 

Si può mettere un'istruzione DATA in qualsiasi posto del programma; 
quando Basic ci arriva sopra, non fa niente e passa aH'isiruzione suc¬ 
cessiva, Cosi. 200 avrebbe potuto essere numeralo 55, e 210 avrebbe 
potuto essere numerato 75, ad esempio. L'esecuzione sarebbe passata 

10 stesso direttamente da 50 a 60 e da 70 a 80, I dati presi non sareb- 
bero stati alterati. Ciò che ha importanza è l'ordine delle diverse 
istruzioni DATA e l'ordine dei dati all'interno di una stessa istruzione 
DATA, 

Al momento della partenza del programma (subito dopo il RUN), il 
primo dato del primo DATA verrà preso a! momento del primo READ 
eseguito. Poi, con il susseguirsi delle esecuzioni dei READ successivi, 

11 secondo dato dal primo DATA, poi il ter/o ecc, poi il primo dato del 
secondo DATA e cosi via, 

Mei nosim esempio, siccome c'è un READ per ogni nuovo giocatore, i 
numeri successivi da cercare sarebbero 5.25, poi 7.65^ poi 2 ecc... os¬ 
sia 14 possibilità diverse concesse. 

Cosa avviene se ci sono più di 14 giocatori? Ebbene, c'è un errore: se 
si prova un READ mentre l'ultimo dato deH'uUimo DATA è stato 'let¬ 
to’, il messaggio 70UT OF DATA ERROR 1M.„ viene visualizzato dal 
C64. 

L'istruzione RESTORE ci permette di aggirare l'ostacolo: essa dà, in¬ 
fatti. la possibilità di ritornare all'inizio dei DATA, Cioè, dopo un RE- 
STORE, un READ ottiene di nuovo il primo dato del primo DATA poi, 
ecc. In questo caso, ripeiicorriamo quindi la stessa serie di numeri da 
indovinare ogni 14 giocatori. 

Per questo, ci serve una variabile J. che conterrà il numero di gioca¬ 
tori. Quando tale numero diverrà 14 o divisìbile per 14. bisognerà fa¬ 
re un RESTORE, 

Ma, come si vede che X è divisibile per Y? Semplicissimo: se X c divi¬ 
sibile per Y, il quoziente X/Y è uguale a 1NT(X/Y) dato che è intero. 
Ed ecco il programma B,6B: 
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PROGRAMMA B.6B 


lid J-J+1 'PRIHT 'OIOCPITORE NO.'NJ 

ae READ C^T-Tl 

30 IF TI-T>7£00 (30TO 70 

40 INPUT"CHE NUMERO PROPONI Sfi 

50 E-lé0*ABS<R-C)/C :IF €<0.5 GOTO m 

60 PRINT"ERRORE";IHT<E#100V100J"K"^DOTO 30 

70 PRINT"TROPPO TARDIf CEDI IL TUO POSTO AL OIOCRTORE 

SUCCESSIVO" 

75 IF INTCJ/H>*J/14 THÉN RÉSTORH 
80 GOTO 10 

30 PRINT"VINT0 IH" ; 1NT< <TI-T>/,6 V100^-'SECONSF' 

100 DOTO 75 

200 DflTR3.25.7,S5>2,121.443.0,075^1© 

210 DflTH5*0.210.70.3l.801.5.3l.4*10.2,7 


Una variante supplementare, rUpettu al prograinma B,6A, giunge dal 
fatto che vi sono più istruzioni su certe lince. Si possono, in effetti, 
mettere più istruzioni per linea a condizione di separarle con il carat¬ 
tere due-punti (:). Ciò rende ì programmi più compatti, ma anche me¬ 
no leggi biU. 

Naturalmente, se la linea "1" racchiude piti istruzioni, un GOTO 1 
porterà alla prima, non in mezzo alla linea! Quindi se un'istruzione- 
deve essere meta di un GOTO o di un IF, deve essere sola sulla pro¬ 
pria linea, o in testa alia linea. 

Altra variante, il numero 5,8 si è spostato dalVlnizio del secondo DA¬ 
TA alla fine del primo. Ciò non cambia assolutamente nulla all'ordine 
dei dati di cui verrà tenuto conto. 


FLsei cizìtJ 5.1 


Un altro metodo per e-eitare Vesaurimento dei dati sa¬ 
rebbe di aggiungete, alia fine della serie, un dato fimo diverso dai uh- 
meri che vogliamo trattare, ad esempio 99999^ e che testiamo: lo tro¬ 
viamo facciamo RESTORE. Componete una versione del programma 
che utilizzi questo metodo. 


DIM e array 


Affrontiamo ora una nozione importante che aumenterà fortemente 
la potenza di trattamento messa a nostra disposizione. 

Giochiamo sempre con più giocatori, che limitiamio a 14, ad esem¬ 
pio. 

Quello che vogliamo in aggiunta è che, una volta effettuata la partita 
da tutti i giocatori, un quadro riassuntivo dei punteggi ottenuti, in 
numero di secondi, venga visualizzato. 
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Perché ciò avvenga, dobbiamo introdurre una nuova variabiJe^ SC, 
Otteniamo allora il programma seguente: 


10 FGR ^-1 tO 14 : PRINT"OIOCflTORe N,";J 
20 REnj C ■ T-TI 

30 SC*<TI-T)/e0 : IF &OU0 0(?T0 70 

40 IWPUT“NUinERO PROPOSTO'*;fl 

50 E»100#flBSCR-C>/C ^ IF E<0.5 GOTO 90 

60 PRINT^ERRORE" ; INT<E*100?/100 ; "Ji" ' GOTO 30 

70 PRINT’* TROPPO TARDI ! LASCIATE IL POSTO HL OIOCATORE 

SUCCESSIVO" 

30 GOTO 100 

90 PRIhlT"VINCe IN" ; IHTCSC*100)/J00; "SECONDI** 

160 HEXTJ 

110 prinT"punteooio-'' ; se = end 

200 DHTR 3,25^7.65.2.121.4SS.0.075V10.5.0 
210 BRTR 210.70.31.501.5.31.4,18.2*7 


Ma questa soluzione non è soddisfacente. Infatti, questo programma 
non stamperà mai altro che il punteggio dell'ultimo giocatore. Ciò 
che ci serve è un punteggio per ogni giocatore, cioè 14 variabili simi¬ 
li, collegate ciascuna ad un giocatore J. 

Basic ha uno strumento per questo scopo. Permette, infatti che SC 
sia una variabile multipla di cui SQl)l sarà il primo valore, SC{2} il se¬ 
condo, ecc. 

Il numero dell'elemento desiderato viene messo tra parentesi: si chia¬ 
ma l'indice. L'indice può essere una variabile: SC(I) è l'iesimo elemen* 
to, o anche una espressione: SC(3*l-4), 

Una simile variabile multipla si chiama un array. Dobbiamo avvertire 
Basic dei fatto che una variabile è un array e del numero di elementi 
(questo per conservare posto in memoria). Lo si fa con un'istruzione 
DIM. Per il nostro esempio, abbiamo: DIM SC(14), In realtà qui riser* 
viamo posto per 15 elementi, poiché è utilizzabile l'indice 0, 
Naturalménte, l'istruzione DIM deve essere eseguita prima di qual¬ 
siasi operazione sulJa variabile in questione: in compenso, deve esse¬ 
re eseguita una voka sola. 

L'istruzione DIM non è necessaria fintantoché il valore massimo 
dell'indice non supera 10: infatti, il C64 riseiva automaticamente po¬ 
sto per 10, Se la dimensione dell'array deve essere minore di IO, 
Tìsiruzione DIM è utile lo stesso perché libera del posto. 

Più array possono essere dimensionali mediante una stessa istruzio¬ 
ne: DIM A(25), B{S0). 

n valore massimo assegnato all'indice può essere una variabile {che è 
stata appena inizi ali zzai a): DIM A(N). 

Usando tali proprietà, arriviamo al programma B,7. 
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PROGRAMMA B.7 
3 Diti SQ<14? 

10 FPR J-1 TO 14 :PRINT"010CflT0RE HO. ";J 
20 RERD C^T-TI 

30 SC<J?»<TI-T>/^60 ‘ IF SC':J»120 GOTO S0 

40 INPUT'NUMERO PROPOSTO";fl 

30 E-ie0i*iRBS<fi-C)/C aF E<0.3 OOTO 90 

60 PRlHT"ERRORE‘MNT<EJ*il0e>/100; "?i" rOOTO 30 

70 PRINT'^TROPPO TflRDI! CEDI IL TUO POSTO RL OIOCflTCRE 

SUCCESS WO^' 

60 GOTO 100 

90 PRIHT"VIHTO IH" J IHT(SC<J)*100>/100;'^SECONDI" 

100 HEKT J 

110 PRIMT "GIOCATORE","PUHTEGOIO" SPRINT 
120 FOR 1-ITO 14 

130 PRIKT 1#inteseci>#100?/100 ^HEKT I 
200 DflTfi3.23,7.63^2,121^449,0*073/18 
2r8 DfiTH5*8,210,70,3l,901.5,31,4,18,2,7 

Lasciamo ora da parte il nostro gioco per qualche istante per vedere 
diversi complementi sugli array. 

Vi conviene salvare questo programma su cassetta mediante Tordi ne 
SAVE. Poi potj-ete cancellare la memoria con NEW, il vostro C64 
sarà disponibile per qualche esercizio. 

Riempimento dì un array 


L'isiru^fione di inserimento INPUT può essere messa in un ciclo del 
tipo: FOR 1 = 1 TO 10: INPUNT AfI): NEXT L Ci piacerebbe sapere ad 
ogni istante quale elenienio deve essere introdotto e avere messaggi 
stampati come; 

A(l)? 

A(2)? ecc. 

Siccome il messaggio comprende un elemento variabile [il valore 
dell'indice)^ la forma INPUT 'TESTO’;... non è adeguata. Bisogna usa¬ 
re un PRTNT che termini con punto e virgola {;) per battere il valore 
sulla stessa linea; 

10 FOR 1 = 1 TO 10 
20 PRiNT ’A(": rx 
30 INPUT All) 

40 NEXT 1 

Somma e media degli elementi di un array 

Gli elementi di un array possono rappresentare le varie osservazioni 
statistiche di una grandezza, ad esempio, l'altezza dei vari alunni di 
una classe. La prima operazione statistica da effettuare su di una di- 
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stribuzione è calcolare la media; per C|uesto, bisogna calcolarne pri¬ 
ma la somma. ^ 

Per calcolare tale somma, useremo una variabile S miziahizata a 0 e 
alla quale, in un ciclo, verrà sommato in successione ciascuno degli 
elementi: 


IO DIM A(N) 

20 REM NORMALMENTE QUI AVVIENE LA LETTURA DEGLI 
ELEMENTI 


30 S-0 

40 POR l = l TO N 
50 S - S + A(l) 

60 NEXT 1 
70 M-S/N 

80 PRINT 'SOMMA S, "MEDIA ='; M 


LTnizializzazione di S a 0 viene effettuata in trenta; tale ìnizializza* 
zione è superflua all'mizio di un programma; può essere necessaria 
se si arriva in 10 dopo aver fatto altre operazioni. 

In 20 appare una nuova istruzione: REM (abbreviazione di "remar- 
que": nota). Essa non influisce in alcun modo sul funzionamento del 
programma, ma permette di incorporarvi commenti esplicativi,, cosa 
spesso utile {naturalmente, tali commenti usano posto memoria). 


I^soi'ci/.io 5,2 


sopra: 


Calcolare /cì varianza dell'itisierrte degli ehmenti A qui 

■* 

N—ì 


Gli arrays sono particolarmente indicati per rappresentare vettori di 
uno spazio vettoriale su K. Ad esempio A{1), A(2), A{3ì saranno le tre 
componenti del vettore A nello spazio a tre dimensioni. Vedremo più 
tardi che Basic permette pure la manipolazione di matrici. 


Esercizio 5-3 


__ Dati i due vettori Ue V di uno spazio ad N dimensioni. 

calcolare il loro prodotto scalare uj 


Numeri casuali - Funzione JfJVD 


E ora giunto il moniento di risolvere uno dei pixjblemi ebe maggior¬ 
mente ci aveva preoccupato atì'imzio del nostro gioco: come fare 
perché il giocatore non possa, anche te bara, trovare in antìcipo il nu¬ 
mero da indovinare? ... 

Il meglio È che il computer stesso non conosca tale numero in antici¬ 
po, cioè che lo sorteggi al momento di usarlo. Va bene, ma come può 
un computer, che deve avere il comportamento più deterministico e 
più prevedibile possibile, dare numeri casuali? 
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A priori, ciò sembra nocivo* Ebbene, ecl è paradossale, esìstono aJgo- 
ritmi che richiamano calcoli ben determinati, che danno quello che si 
chiama serie pseudocasuale, cioè successioni di numeri ben determi¬ 
nati ma aventi proprietà statistiche tali che si possa considerare che 
tutto si svolge come se i numeri fossero stati sorteggiati. 

In questo contesto, ìi termine 'numero casuale' non può riferirsi ad 
un numero isolato, ò solo a livello di una successione (numerosa) di 
numeri che esso ha un senso, 

A cosa serviranno mai tali successioni? Servono per calcoli di simula¬ 
zione nei quali bisogna tener conto di fenomeni aleatori. Ad esempio, 
supponiamo di voler simulare dieci anni di sfruttamento di una pro¬ 
prietà agricola. 

Uno degli elementi che intervengono può essere la produzione di gra¬ 
no di un certo campo, sappiamo che, qualsiasi cosa avvenga, questa 
produzione è compresa tra JO t (annata dalle condirioni atmosferiche 
sfavorevoli, cattive semenze, eeej e 15 t (annata che unisce eccezio¬ 
nalmente tutti i fattori favorevoli). 

Per simulare i rischi dovuti a cause poco note, la cosa migliore è, per 
ogni anno, di sorteggiai-e un numero tra 10 e IS: sarà il modo miglio¬ 
re per ottenere, nella nostra simulazione su dieci anni, un certo nu¬ 
mero di buone annate e di cattive annate, che possa rappresentare la 
realtà. 

In realtà, in questo caso, non soricggeremo un numero distribuito 
uniformemente ira 10 e 15: cercheremo di produrre una legge di pro¬ 
babilità ottenuta da osservazioni o rispondente ad un modello. 

Si vede che i numeri casuali possono essere molto utili. Il C64 può 
fornircene* Basta fare Y “ RND(X) per ottenere un numero casuale 
tra 0 e l. 

Se X > 0, si generano diverse sequenze pseudocasualì: successivi ri¬ 
chiami con lo stesso valore di X > 0 danno gli elementi successivi di 
una stessa sequenza (iì numero ottenuto cambia ad ogni richiamo, es¬ 
so fa parte della stessa sequenza). Cambiando il valore di X, si cam¬ 
bia successione. 

Essendo il numero ottenuto compreso tra 0 e 1, cioè della forma 
0*233745, si dovrà fargli subire una trasformazione per rispondere ai 
nostro problema. 

Generalmente, bisogna ottenere una serie di numeri Y compresi tra 
due valori A e B. La successione di operazioni seguente permette di 
ottenere tali numeri: 


Y = A + (B—A)*RND(1) 
il più delle volte, si userà RNDfl). 

Applichiamo ciò nel programma B.S per ottenere un numero compre¬ 
so tra I c 100: 
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PROGRAMMA B.8 


5 INPUT' NUMERO DI OlOCflTORI';N: DIM SC<N> 
le POR J-1 TQ K:’PRINT''0I0CPT0RE NO.'SJ 
20 C-1+99*RND<1?'T-TI 

30 SC<J>-CTI-TV60 tIF SCCJ»120 GOTO 90 

40 JNPUT" NUMERO PROPOSTO" ;R 

S0 E-100#RBS^F1-C>/C :IF Ed GOTO 30 

60 PRINT'-ERRORE”; INT<Eil'100>/100;"K“ GOTO 30 

70 PRIHT"TROPPO TARDI! CEDI IL TUO POSTO AL OIOC8TORE 

SUCCESSIVO" 

80 SCCJ^^Q ^OOTO 100 

90 PRINT"VIHTO IN" ; INTCSC<J? *100100J "SECONDI " 

95 SC<J>-=l*INT< a20-SC<;J) V£4> 

100 NEKT J 

110 P-ilNT ' GTrFCATnRE"."PUNTEOOEO" SPRINT 

120 POR i-iro N 

130 PRINT I. INT<SCa?*100)/Ì00 :NEMT I 


Il cambiamento più notevole sta quindi nell istruzione 20 dove il nu¬ 
mero da cercare viene ora sorteggiato. Lo si potrebbe rendere ancora 
più casuale (infatti, alla partenza dei gioco, si avià sempre la stessa 
serie di numeri) indicizzandolo sul tempo, ad esempio scrìvendo; 

7T = TI; X^T-lOG + INTCr/ÌOO) 

20 C = 1 +99*RNDC1 ■(■X);T = TI 

La linea 7 ha iVfetto di mettere in X le due cifre di destra di TI, Se 
Tl = 2S73, INT(TT/100) è uguale a 28 e X sarà uguale a 2873 — 2800 os- 
sia 73. 

Cosi stando le cose, a seconda del tempo trascorso dall accensione, 
verrà generata una serie diversa. Sono stati introdotti altri rniglìora- 
menti che hanno facilitato leggermente il gioco. Ad esempio, l'appros¬ 
simazione è stata messa ad ma siete perfettamente liberi di mo¬ 
dificare questa approssimazione e il limite di tempo. 

II numero N dei giocatori è ormai variabile. 

Il punteggio viene dato in punti da 0 a 5 (0 se il giocatore non ha tro¬ 
vato in tempo, 5 se ha trovato prestissimo). 


l'sei'ci/.io 5.4 


Misurare la botità statistica del generatore di numeri 


casuali del C64. 


Per questo, tireremo 1000 numeri a sorte, compresi tra —1 e + L Cal¬ 
coliamo poi media e varianza (valori ideali 0 e 1/3) cosi come gU 
tivi delle 10 classi; 

E—L^/5}:(—4/5,—3/5L.,.:i;0,l/5]...[4/5ril(valore ideale lOO). 
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IJ programma seguente è una delle possibili soluzioni: 


10 FOR I-l TO Idee 
20 N"<-1>+2#RND<1> 

30 Si*S‘«-M^S2BS2-f-Nt2 
40 Jb1+int<(H+1>i|i5? 

50 C<J>-C<J5+1 
60 NEKr I 

70 K*S/10O0'V-CS2-’10e0«J^t2>/'99? 
00 PRJNT^MECIfl 
00 PRINT'^CLRSSl" 


Attenzione, non succede niente per 1 minuto e mezzo. Siate 
pazienti!... 

Array multìdimensionali 

Perfezioniamo il nostro gioco, di modo che permetta ad ogni giocato¬ 
re di disputare diverse partite e che visualizzi i punteggi di ciascuna 
di Queste partite. 

li C64 permette di formare degli array a doppia entrata (detti anche 
array a due ìndici, o a due dimensioni). 

Per fare ciò usiamo un'istruzione DIM della forma: 

DIM SC(NJ,NP) 

se ci sono NJ giocatori e NP partite. Il punteggio del giocatore J nella 
partita P verrà designato con SC(J,P); ne segue il programma B.9. 

PROGRAMMA B.9 


10 INPUT"NUI^ERO DI OIGCnTQRr iNJ 
20 lNPUT"QUflNTE PPRTITE“;nP 
30 DIPI SC<HJ,NP> 

40 FOR P»1 TO NP:F0R J-1 TO HJ 
50 PRIHT"GIOCATORE NO.Ji“PHRTITR-;P 
€0 C-1+39H(RND<1 > :T-T1 

70 SC<J,P)-CTI-T>/60:IF SC<J,P»l2e GOTO U0 

90 INPUT"NUMERO PROPOSTO"; fl 

90 E-10eiKflDS<fì-C)/C ’ IF ECl GOTO 130 

100 PRINT-ERRORE"JINT<E*100>/'100;"K"'OOTO 70 

110 PRINT-'TROPPO TARDI !CEDI IL POSTO RL GIOCRTORE 

SUCCESSIVO" 

120 SC<J^P>-0 :OOTO 156 

130 PRINT-VINTO IN"; INKSCCjr, P>iM@0>^100; “SECONDI ^ 
140 SCCJ,P>-l-i-INT<C!20-SC<J,P?>/24> 
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t^e NEJ^T J.P : PRIMI ,= PRINT 

pRjNT "giccptqre'^ for p-1 io NP 
170 PRINT ”PPRTTTft-‘;P; :HEXT P 'PRIMI ^PRIMT 
180 POR J-1 IO NJ PRIMI J. 

190 POR P*1 IO MP PRIMI SC<J^P>. 

200 MEXT PAPRIMI :NEXT J 


In matematica, questi airays rettangolari si chiamano matrici i cui 
elementi sono distribuiti in linee e coiomie. Le matrici hanno nume¬ 
rose applicazioni che sono quindi realizzabili sul C64. 

Scrivere un progrùmtna che calcoli il prodot io C di due 
matrici A e B (richiamo della formula di definizione: C(; = ^ fl» ■ h,j}^ 

Ciò che abbiamo appena esposto riguardo agli arrays può essere ge^ 
neralizzato; il numero delle dimensioni può essere qualsiasi; in tre di¬ 
mensioni, gli elementi si distribuiscono in piani, linee e colonne. 
L'unica restrizione formale al numero delle dimensioni è che Tislru- 
zione DIM deve limitarsi a 80 caratteri. Ma altre limitazioni inte^em 
gono prima; non deve essere superata la grandezza deila memoria ri¬ 
masta a disposizione. 

Manipolazione di stringhe di caratteri 

Ci rimane ancora un miglioramento da apportare al nostro program- 
man Infatii, sarebbe desiderabile che, al momento della stampa dei ri¬ 
sultati, venisse scritto il nome di ogni giocatore, c non il suo numero. 
Vedi’emo che questo c possibile. È infatti indispensabile che il com¬ 
puter permetta di manipolare testi o nomL In gestione, bisogna pur 
manipolare il nome dei clienti! 

11 C64 ammette due tipi di variabili: le variabili numeriche, che già 
conosciamo, e le variabili alfanumeriche, o stringhe di caratteri. 11 
nome di una variabile stringa viene formato come quello di una va^ 
riabìle numerica, aggiungendo un t alla fine: 

A: variabile numerica 
A$: variabile alfanumerica 

Congiuntamente, nello stesso programma, possono essere utilizzate 
le variabili distinte A ed AJ. 

Soltanto i due primi caratteri del nome di una variabile sono conside¬ 
rati (a parte il %): ALJ e ALFA$ sono la stessa variabile. 

È possibile formare arrays di stringhe di caratteri: DIM NOMS(N) ri¬ 
serva un array di N stringhe di caralteri, e ciascun elemento può con¬ 
tenere un numero variabile di caratteri. 
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Per assegnye un valore ad una stringa di caratteri, l'istruzione più 
semplice è 1 assegnamento classico: AS ='BUONGIORNO". 

Si noti che il valore assegnato è racchiuso tra apicin 
Si può anche leggere la variabile dalla tastiera con INPUT A$ In tal 
caso non è necessario mettei-e BUONGIORNO tra apici, poiché il C64 
SI aspetta una stringa di caratteri. 

Si possono usare, infine, READ c DATA. Nel DATA le stringhe sono 
normaimente senza apici, tranne se contengono un carattere speciale 
come spazio, virgola, due punti o i caratteri grafici: 

10 READ A5, B$ 

ZO DATA BUONGIORNO, "A Piti TARDI" 

Siamo ora pronti per capire il programma BJO. 

PROGRAMMA B,10 


le 

£0 

30 

35 

40 

50 

60 

70 

00 

00 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 


GI0CPT0RJ,m*DI PARTITE" ; HJ.WP 
DUI NOri*<NJ>^SC<NJ^NP> 

FOR J»I TO NjspRlNT^'NOnE J3EL GIOCATORE 
INPUT N0M*a> H^KT J 
FOR P-1 TO NP:F0R J-l TO hJ 


; JJ 


"PARIITA";P 


PRINT"GIOCATORE NO. 

C-1+99#RND<1J ^T-TI 
SC^P>-<Tr-T)/60fIF SC<J^P>^120 GOTO 110 
IhPUT"NUMERO PROPOSTOA 
E-100*flBSCR-C>/C :IF £<1 GOTO 130 
PRINT“ERRORE" ; INT<E*100>/ie0; "X** fGOTO 70 
PRINT'TROPPO TARDIICEDl IL POSTO AL GIOCATORE 

SC<J,P)-0 =Q0T0 ise SUCCESSIVO" 

PRINT^'VINTO IN"/ IHT<SC<J^P>#t00>/100; "SECONDI " 
se < J, P 1 -i-IhT < C120-SC a ; P) > t^24 ) 

NEMT J.P sprint 'PRINT 
PRINT -GIOCATORE".:FOR P*i TO NP 
PRINT "PARTITA";Pù NENT P :PRINT 
FOR J-1 TO HJ tPRINT N0P1*<J)^ 

POR P-1 TO NP 'PRINT SC<:Jj.P:), 

NEKT P'PRINT JNEXT J 


SPRINT 


Nei precedente programma non facciamo altro che leggere un nome, 
riporlo in NOM$(J) per memorizzarlo e stamparlo un po' più tardL È 
spesso 1 unico trattamento dà effettuare sulle stringhe di caratteri. 
Ma, in alcuni casi, si devono effettuare trattamenti sulle stringhe, co¬ 
me confronti, estrazioni, conversionip ccc^ Vediamo ora le operazioni 
dì questo tipo disponibili sul C64. 

Confronii: un'istruzione come IF AS = B5 GOTO.., permette di con- 
Irontare Je due stringhe AS e B$, Le applicazioni sono numerose; si 
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può^ ad esempio, verificare se una parola appartiene ad un dkiofiario 
o se un noitie figura in una lista di persone autorUiattì... Un altro 
confronto come IF A% < è pure utile: infatti, la parola AJ è colisi^ 
dorata minore di B$ se la precede nell'ordine alfabetico, dal che se¬ 
gue un modo per classificare liste di nomi in ordine alFabetico^ 

Concatenamento: ^operatore + applicato a due stringhe dì caratteri 
ne produce il concatenamento: 

'BUON“ + "GIORNO' dà BUONGIORNO. Battete 
a$ = "gio- 
B$ = "NO' 

= 'BUON" + AS + "R" + B$ 

?C$ di, nuovo, ottenete BUONGIORNO 

Stringa vuota: è la stringa di 0 caratteri, A$ = dà ad AS il valore 
'stringa vuota*; per ogni XS, XS + A$ sarà identica a X$. 

Estrazione di sottostringhe: il C64 possiede un certo numero dì fun* 
zioni che permettono la "manipolazione" delle stringhe dì caratteri, 
Se il nome della funzione termina con il suo risultato è una stringa 
di caratteri; altrimenti il risultalo è un numero, 

— LEi^(XS}: fornisce la lunghezza (numero di caratteri) della stringa 

x$r'‘ 

— LEFT^X$,N): fornisce gli N caratteri più a sinistra, estratti dalla 
stringa XJ. 

— RIGMT$(X$,N): fornisce gli N caratteri più a destra, estratti dalla 
stringa XS. Se N > LEN(X$), otteniamo tutta la stringa (questo vale 
anche per LEFT$): 

— MIPS: estrae caratteri in mezzo ad una stringa: pnò avere due o 
tre argomenti: 

— MID^XS^Kj: fornisce i caratteri estratti dalla stringa X$ dalla po- 
sizione it in Se K>LEN(XS), otteniamo la stringa vuota: 

_ M[D$(X$,K,N}: fornisce la soitostringa dì N caratteri estratti da 

XS dal Kesimo m poi. Se K > LEN(X$), otteniamo la stringa vuota; se 
N richiede più caratteri di quanti ne rimangano in XS, otteniamo tut¬ 
ti i caratteri dì XS dal Kesimo in poi. 


ICscrcìzio 5.6 


lettera A, 


Sostituire il quinto carattere della stringa X$ con la 


Ivscrci/.in 5.7 


_ Verificare che la stringa AS contenga la sottostririga 

Mettere nella variabile K, 0 se non la contiene, e se la contiene, la 


prima posizione in A$ in cui sì trova BS. 
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Ad esempio, se B$ = 'BRA', in ABRACADABRA, troviamo in 2 e in 
9, e dobbiamo ottenere K = 2, Con BUONGIORNO, dobbiamo ottene- 

re K = 0. 


Funziom di convérsione: le èlitre funzioni sti ijighe di caratteri effet¬ 
tuano conversioni tra 1 numeri e la loro rappresentazione sotto forma 
di stringhe di caratteri o di codice ASCII (il codice ASCII è il modo di 
rappresentazione interna scelto dal C64 e la maggior parte dei ipicro- 
computers: ogni carattei-e è rappresentato da un valore binario scel¬ 
to, che occupa un byte). 

Vi sono quattro funzioni di questo tipor 

“ Fornisce il valore in decimali dei byte che rappresenta in 

ASCII il primo carattere di Esempio: ?ASCrA'*) dà 65. 

— fornisce una stringa di un carattere: il carattere di cui K 
e il codice ASCII. Esempio: ?CHR$(65) fa stampare una A. 

— STR ^Ai fornisce la stringa di caratteri che è la rappresentazione 
decimarci numero A, Se A = 3.5 STR${A) è la stringa: spazio (per il 

?STR^(A) producono la stessa stampa con la 
sola differenza che ?A è seguito da un movimento dei cursore verso 
destra c non ?STR$(A). Osservate la differenza tra: 

?'AA";Af AAA- e ?"AA':STR$(A);'AAA- 

C'è tuttavia un'importante differenza: STR$(A)è una stringa di carat¬ 
teri che può essere soggetta ad operazioni LEFT$.., 

— VA!4X$}: fornisce il valore del numero del quale X$ è la rappre¬ 
sentazione decimale. Gli unici caratteri permessi in X$ sono le cifre, 
il punto, lo spazio e + o —. Se il primo carattere non bianco di XS 
non è uno dei caratteri permessi, otteniamo 0. 


Esercizio 
Esercizio 5.9 


A è un inUro. Trovare U numera deUe sue cifre. 
Stampare B sopprimendo 3 cifre decimaìi. 


RICAPITOLAZIONE 

Siamo orj^Ttìfi giunti ad uno stato perfezionato deì nostro programma 
di gioco, 

Espiorandoìo abhiartro scoperto le principali possibilità deì Basic. 

Le istruzioni descritte finora valgono in generale per tutti i computers. 
Ora vedremo delie proprietà particolari del €64 che, per ia maggior 
ptirte, non si ritrovano sugli altri personal e, in particolare, le possibi¬ 
lità grafiche e sonore. 

Ma prima, trattiamo due esercizi fondamentali. 
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Calcolare il punteggio ìnedio di ogni giocatore SM(T). 
Stampare il nome e il punteggio del giocatore che ha il punteggio mas¬ 
simo. In caso di parità, si sceglie il primo trovato. 


È particolarmento necessario qui ragionare suirordinogramma per 
studiare il problema del massimo. Questo problema molto classico si 
pone in innunierevol] applìcadoni. 


Mtìcrcizio I ì 


primo. 


Stampare la classifica dei giocatori, e non soltanto il 


Richiamo: soluzioni agli esercizi vengono proposte in appendice. 





Capitolo 



Programmi grafici; 
colore e suono 


L'istruzione più semplice che permette di fare disegni sullo schermo, 
la conosciamo già. Sì tratta seropliefcmente deiristruzione PRINT* 
PRINT "stringa di caratteri" fa stampare una stringa di caratteri sul¬ 
lo schermo. Ciò permette di stampare un testo, come abbiamo già vi¬ 
sto. Ma li C64 possiede tutto un insieme di caratteri detti grafici, par¬ 
ticolarmente adatti al disegno, che possono, come gU altri, venir in¬ 
corporati tra gli apici di un^istruzione PRINT. 

Per disegnare con istruzioni PRINT, useremo una caratteristica del- 
C64 che si rivelerà molto potente: dopo aver fatto un disegno sullo 
schermo, batteremo alTinizio dì ogni linea di disegno; numero ?'Re- 
turn". Abbiamo costruito un programma il cui effetto sarà di stampa¬ 
re il disegno considerato. 

Ciò proviene dalle proprietà già viste del tasto 'Retum' per la scrittu¬ 
ra di un programma. 

Questo modo di procedere è molto pratico. Infatti, f "artista" può met¬ 
tere a punto il proprio disegno, correggerlo, spostarlo (a destra con ì 
tasti ‘Shift^ Tnst/Etel', e verso l'alto tutto in un colpo portando il cur¬ 
sore sulPultima linea dello schermo e battendo ^Return'). 

Facciamolo. A tìtolo dimostrativo disegneremo una casa. 

Prima di tutto cancellare lo schermo con ’ Cir' . 

Portare il cursore ai centro dello schermo, un po' sulla destra poi 
battere / ('Shift* N) , —11 7 volte e \ TShift' M). È la prima lìnea 
del disegno, rappresenta il tasto ' Commodore" . Con movimento 
del cursore (e non con il tasto ' Return ' che farebbe stampare SYN- 
TAX ERROR) portare il cursore sulla lìnea successiva, uno spazio più 
a sinistra del i della linea precedente. Battere / fShift ' N), 9 spazi e N 
fShift " M). Il tetto si profila. 

Linea successiva: sotto il I con movimenti del cursore. Battere: 
—i'C=^ T), r CShift" 0), T) 7 volte, “ì CShift' F} e ' T). 
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Lìnea successiva; spazio | 0C=' G), f fShift' N, "rC=' TJ. I CShift' MK 

spazio, r a),tì:^' ri n e jrc=' m). 

Lìnea successiva: spazio, | (T—' C) 2 voJte, spazio, | {'C=* Mi), spazio, 
H Q). + rShìft ' +), H £0= ^ W), J M). 

Linea successiva: spazio, f rC= ' C) 2 volte, spazio, | VC-' ML spazio. 
I_ (:C=^ Z).±CC= ' E), _| X)J ' M), 


Ultima linea: ^‘C=^ L_ fShift' LJ 2 volte, —rc==' ®ì, _t 
m- - ~i'C=' m 4"^te, _| rSMiF ®) e - rO' 


Ecco fatto! Otteniamo una casa che ha l'aspetto rappit seti tato qui di 

fronte. Ohi manca il camino! Nessun pro^ 
blema per aggiungerlo. Portate il cursore 
giusto sopra il letto, sopra la finestra e bat¬ 
tete ■ ('C= ' i) e giusto sotto ■ {'C= ' U). 
Ora dovete aver preso dimestichezza con 
una buona parte del caratteri grafici del 
Cb4^ Provate altri disegni, ispirati da que¬ 
sto, o completamente diversi. Ma prima 
dobbiamo salvare il nostm disegno di casa. Per questo, bisogna tra¬ 
sformarlo in programma. È facile; all'inizio di ogni linea, battere 
10?', poi 15?' ecc. fino a 50, 



Facendo LIST dobbiamo vedere apparire il pmgramma C,l (ogni li¬ 
nea è in realtà listata su due lìnee, sullo schermo); 


PROGRAMMA C.l 


10 PRihT" 
iS PRINT'' 
20 FRINT" 
25 FRINT" 
30 FRINT" 
35 PRINT" 
40 PPINT'^ 
45 PRIHT" 
50 PRINT" 




/ \ 


T—- r 

I rt-] I 
[ r imi 
! F r I 

U_^_L 


Ora, eseguite il programma mediante Tordine RUN; la casa apparirà 
sullo schermo, sbarazzata naturalmente dei numeri di linea e delle 
istruzioni! 


Fscrci/io 6.t 


Aggiungiate un fih di fumo sopru il camino. 


Domande: le istruzioni del programma Cl hanno degli apici non 
chiusi. Non fa niente, i/ Basic del C64 ne genera uno fittizio aHa fine 
detta linea. 
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Mon ottengo la casa ma ìetlere miste a segni grafici. È perché slitte in 
modo lesto. Premele sirnnUaneamenle ’ Shift* e ' Commodore^ 

Due importanti raccomandazianl per ottenere i risultali migliori: 

— si devono usare numeri di istruzioni della stessa lunghezza, altri¬ 
menti vi saranno spostamenti; 

— si deve mettere il disegno che si prepara abbastanza sulla destra 
dello schermo, perché, dopo, sarà spostato verso sinistra. 

Un'ultima nota: questo metodo non permette dì incorporare caratteri 
a contrasto invertito nel disegno. 

Caratteri movimento del cursore 

Il programma C.l presenta diverse imperfezioni. La prima è che il di¬ 
segno appare in un posto qualsiasi dello schermo e che non è solo: ciò 
che avevamo sullo schermo prima di fare RUN appare in alto dello 
schermo. 

In modo diretto, è facile rimedian^i: possiamo svuotare lo schermo 
con il tasto ' Shifi' ^Clear/Home ' e portare il cursore dove vogliamo 
con ì tasti movimento dei cursore. 

Ebbene, tutto ciò è pure possibile ìn modo programmato. Il segreto? 
Semplicissimo* includendo i caratteri della visualizzazione fchiamia- 
mo in questo modo i caratteri come ' Clr ', movimenti del cursorc,- 
'Rvs' ecc.) nella stringa di caratteri tra apici; diverranno effettivi sol¬ 
tanto al momento dell'esecuzione. Ad esempio, aggiungete al pro^ 
gramma CA Listruzjone: 5 ?'ClrV 

Lo schermo non viene svuotato quando battiamo il 'Clr' inserendo 
l’isiruzione. Lo sarà quando avremo fatto RUN. 

Quando abbiamo battuto l'istruzione, è avvenuto qualcosa di strano: 
battendo 'Clr ^ lo schermo non si è svuotato, ma è stato stampalo un 
carattere nella strìnga, InFatti, il C64 deve pur mostrare qualche co¬ 
sa, Esiste una corrispondenza tra i caratteri dì comando e la loro rap¬ 
presentazione visibilcj che diamo qui sotto, Ogniqualvolta ci trovia¬ 
mo tra apici e battiamo un carattere comando di visualizzazione, è la 
rappresentazione visibile quella che appare, poiché il C64 differisce 
l'esecuzione del comando fino all'esecuzione dclTistruzione. 

I caratteri della rappresentazione sono tutti in contrasto invertito, 
per essere più riconoscibili, ma si pone una domanda: si possono 
stampare quei caratteri come disegno?: sL verranno usati altri tasti a 
questo scopo. 

Ma ci sei'V'e, in questo libro, una rappresentazione dei caratteri di co¬ 
mando, per dai’vi istruzioni da battere. 

Seguiremo la convenzione seguenté: il nome inizia con una maiuscola 
seguita da minuscola, il nomee sottolineato se non c'è ’ Shift' e sopra- 
lineato se c'è ' Shìft '^ Esempio ' Home ^ si distingue da HOME (4 carat- 
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terl) 'Clr' è premuto con ' Shìft \ Abbiamo già usato questa convenzio¬ 
ne per designare i tasti " Return ' o 'Space\ Infine, per i caratteri otte¬ 
nuti con il tasto "^CtrT, scrmamo JtJiJt *'. Rvs^ e Offf. Diremo che questa 
è la rappresentazione libro. 


Tab. 6.1. I caratteri di cornando dJ vt^ualtTzazJone. 


RapprueniBzJcHi? RappreBcnlaztcntc 

libro visibile C64 

‘iihill’ o 

+ T -Il 

Carattere dell'alto del tasto 

'Espace' o Sp 

! 

Spazio 

‘Reium' 

. *, 

Ritorno carrello 

jt 1 


Cursore a destra 

F 

D 

Cursore a sinistra 

s 


Cursore in giù 

a 

□ 

Cursore in su 

1 

Home 


Cursore ai l'orìgine 
(in allo a sinistra^ 

Clear o Clr 

□ 

Svuotare lo schermo 

Rvs^ 


Inversione di contrasto 
(nero su bianco) 

Rvs Off^ 

H 

Ritorno al contrasto normale 
(bianco su nei\)) 

Dd 

□ 

Soppressione di carattere 

Inst 

n 

1 Inserzione di carattere 


NB. La tabella 6.1 verrà completata nel seguito di questo capìtolo con 
i caratteri di comando di colore* 


Lsctei/io 6.2 


Quale stampa produce l'istruzione: 


10 FRINT 'AAAsr; 'Irtst Inst BB 
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Gli unici caratteri cht^ non si possono includere in una Strìnga sono 
L'apice ('") — che può concludere la strìnga — e il ’ Return* . Mp si pos¬ 
sono stampare degli apici facendo: 

?CHR$(34) e sì può simulare un ritorno carrello con ?CHR|(13) 

Siamo ora in grado di far stampare la nostra casa in mezio allo 
schermo, cominciando il pjogramina con Clr seguito da dieci cursore 
—in—giù. Terminiamo con 60 GOTO 60 per evitare la stampa del 
READY. Potete aggiungere sparì nei PRINT affinché la casa sia più a 
destra. 

Ed ecco il programma C.2: 

PROGRAMMA C.2 


5 PRrHT"nWW)(B®^^ 

10 PRINT" 

15 PRINT" - 

20 PRIHT^' / 

25 PRINT" T- 

50 PRINT" I 

.35 PRINT" I I I 

40 PRINT" I I I 

45 PRINT" _ X 

50 PRINT^^ 

60 QQJQ 60 


\ 

\ 


1 


Domanda: con 60, ho un programma che non termina mai* Come 
uscirne? 5i preme il tasto Stop', 

Stampa delPora 

Invece dì eie lare sul GOTO 60, si potrebbe stampare l'or a. Questo 
presuppone, ovviamente, dì aver regolato Torà In modo diretto: 
TI$ = "123400"' (se sono le 12 e 34). Non si dimentichi ch^ TI$ è una 
strìnga di 6 caratteri HHMMSS. 

Ma un semplice 60 ?TI$: GOTO 60 non è adeguato: copre lo schermo 
di messaggi diversi. 

Ciò di cui abbiamo bisogno* è dì stampare il TI$ sempre nello stesso 
posto. I movimenti del cursore ci forniscono la soluzione. Dopo una 
stampa, siamo pronti a stampare immediatamente sotto. Bastano 
quindi una 'a' per risalire di una lìnea, e 18 'd' perché l'ora sia sotto 
la casa. L'istruzione 52 PRINT genera una lìnea intermedia ed evita 
che l'ora sia attaccata alla casa. 

Otteniamo allora il programma C,3A, 
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PROGRAMMA C-lA 


5 


10 

PRINT" 

m 


15 

PRINT" 


\ 

20 

PRIHT" 


\ 

25 

PRINT" 

n-- 

-T 

50 

PRINT" 

1 y^\ m 

1 

55 

PRINT" 

1 f 1 m 

J 

40 

PRINT^' 

n 1 

1 

45 

PRINT" 

_U_L 

_L 

50 

FRINÌ" 



52 

PRIMI 




^0 PRIHT"^IiM»»PHMI*:GOTO 60 


P.scrcÌ7Ùj 


B più beilo ancora, quando Poro viene stampala a con¬ 


trasto invertito^ 


Estro i]tÌH 6.4 


mMssS, 


Vorremmo stampare rora^ ma nella forma hhHm 


Per questo, si usano ìé funzioni stringhe di caratteri* il numero delle 
ore è LEFT$(TI$,2), quello dei secondi RIGHT$(TIS.2) e quello dei mi¬ 
nuti è MID$(Ti$,3,2). Dal che segue la nuova fine del programma 
(C.3B) dopo 50; 

SI FRINT 

55 H$ = LEFT5(TIS,2): M$ = MlD$tTU.3.2h S$ = RIGHT$(T1 Sh2) 

60 PRINT ^ addddRvs $^SpHSp"M$^SpMSp’^ì^"SpSSp^: GOTO 55 

Si noti che i sono inutili, ad esempio, tra H$ e 

Scritta sullo schermo da POKE 

Esiste un altro modo di scrivere l'ora in un posto fisso dello schermo. 
Questo modo deriva dalle due possibilità di accesso diretto alla me¬ 
moria offerte dal C64, le istruzioni PEEK e POKE. 

PEEK permette di leggere dove si vuole in memoria 

PEEK (x) fornisce il valore compreso fra 0 c 255 del byte d'indirizzo x 
(in decimali). 

Ad esempio ?PEEK(0ì fa stampare 47 poiché aH'mdiri^zo 0 della me¬ 
moria. c'è 47. 

Se la prima istruzione del vostro programma è 5.^ allora ?PEEK(2051) 
fa stampare 5, Potete in tal modo venire a conoscenza del contenuto 
di qualsiasi locazione della memoria. 
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POKE permette di scrivere in una locazione della 
memoria 

POKE X, y scrive nelTmciirbio x il valore y (y deve essere compreso 
tra 0 e 2S5, x fra 0 e 65535). 

Ad esempio» POKE 1024.0 scrive il numero 0 nella casella dì memoria 
di indirizzo 1024. Fatelo, 

Toh» è apparso un segno @ in alto a sinistra dello schermo. La ragio¬ 
ne è semplice: una zona della memoria serv^e a rinfrescare io scher¬ 
mo. Ciascuna locazione di tale zona contiene il codice-carattere del 
carattere che deve essere visualizzato nella posizione corrispondente 
dello schermo. Siccome vi sono 25 linee di 40 colonne sullo schermo^ 
ossia 1000 posizioni, la zona ccìmprende 1000 bytes. Va da 1024 a 
2023, in conformità allo schema qui sotto. 


La posiziottiì di stampa de Ho 
schérmo linea 

I colonna J corrisponde airin- 
dirizzo: 

/(?25+f/-/J*40 + J 


Ma non è cosi semplice* È possibile che quando avete fatto POKE 
1024, 0 non abbiate fatto apparire alcuna @. Ciò può essere dovuto al 
fatto che. essendo in basso allo schermo al momento del POKE, la @ 
è subito stala cancellata al momento dello spostamento in allo dello 
schermo per avere READY* 

Per eliminare questa causa, fate ' Sto p' ' Restore ' lo schermo si svuota. 
Poi fate POKE 1024, 0 dopo essere risaliti alla prima linea dello 
schermo* Allora ottenete la stampa in alto dello schermo: 

@ OKE 1024, 0 
READY 


(1024)t1025). (1063) 
(1064)11065).** (1103) 


(1&B4 ) 


_ (20231 


La @ è effettivamente apparsa. Pmviamo quindi di fame apparire 
una in basso a destra dello schermo con: 

POKE 2023, 0 

Non accade nulla. In realtà, la @ è effettivamente apparsa. Ma. è sta¬ 
ta scritta in azzurro su sfondo azzurro* dunque non la vedete! per ve¬ 
rificarlo. portate il cursore in basso, a destra dello schermo (attenti, 
non superate la posizione^ altrimenti tutto risalirà). Vedete in azzurro 
la vostra @. 

In realtà, c'è una seconda memoria associata allo schermot occu¬ 
pa, pure lei. 1000 posizioni da 55296 a 56295, e airindirìzzo 55295 
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+ (I — 1) * 40 + J si trova il codice del colore dì stampa dd carattere 
in linea I colonna J delio schermo. 

Per verificare^ riportate il cursore verso iL centro dello schermo e fa* 
te POKE 56295,2, La @ appare effettivamente in nero sullo schermo, 

I differenti codici colore verranno descritti nella sezione del presente 
capitolo che tratta della questione dei colori. 

Visualizza tinfl A verde sulla 3^ linea 4^ colonna del¬ 
lo schermo (il codice-schermo di A è I, il codice colore del rosso è 5/ 

Per stampare un carattere, disponiamo ora di tre metodi: 

— o P^carattere"; 

— o ?CHR$(asc[i); 

— oppure POKE posizione, codice-schcrmo. 

I codici ASCII ed i codici schermo sono riassunti nella tabella a pagi¬ 
na segviente. 

Annotazioni sulla tabella 6.2 

+ : quando un codice ASCII, a, h seguito da è perché sì può usare 
equivalentemente il codice a-1-64; 

* : per ottenere il carattere in contrasto invertito, aggiungere 128 al 
codice schermo; 

— : per i tasti lettere se codice ASCII del carattere x = a allora codice 

ASCII DI Shift K-a + 128, 

Rimane da spiegare perché certe linee della tabella contengono due 
caratteri. Ciò è dovuto al fatto che la visualizzazione funziona in due 
modL II carattere di destra (nella tabella) appare quando si è in modo 
grafico. Il cattere di destra (nella tabella) appare quando si è in modo 
testo, AlTaccensione e dopo 'Stpp^ ^Restore' si è in modo grafico. Si 
passa da un modo aU'altro premendo simultaneamente ' Commodore' 
e ' Shift '. Ad esempio, fate ?CHR$(65) CHRS(216). Ottenete una A 
maiuscola e un trifoglio. Se premete e ' Shift '. la A maiuscola dh 
venta a minuscola e il trifoglio diventa una X maiuscola, 

Sono ì caratteri grafici che stanno sulla destra dei tasti (ottenuti con 
SHIFT) quelli che, in modo testo, vengono sostituiti dalle lettere 
maiuscole. I caratteri grafici ottenuti con ' Commodore ' rimangono. 
L'unica eccezione è il tasto (ottenuto con ‘Shift) rimane men¬ 

tre [5 diventa ^ , 

Si noti che, anche in modo testo, si dispone di un certo numero di ca* 
ratteri grafici: lutti quelli che. nella tabella 6.2, stanno da soli in una 
colonna. In particolare, i caratteri che aiutano a presentare tabelle di 
numeri sono sempre disponìbili. 

II nostro primo uso di ciò, sarà di scrivere Lora in alto a sinistra deh 
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lo schermo. Per questo, piazzeremo ciascuno dei 6 caratteri di TI$ 
agli indirizzi 1024 e successivi e vi imporremo il colore nero (codice 
0)^ 


200 POR I = 1 TO ó : POKE 1023 +1, ASC(M1D|(T1$, t)) 

210 POKE 55295+1, 0 : NEXT GOTO 200 

Ricordatevi il funzionamento delle funzioni di stringhe di caratteri: 

l) prende i caratteri di TI$ dall'lesimo in poi, ASC prende 
il codice ASCII del primo di essi. 

Sfruttiamo in questo caso ìi fatto che TI$ è formato da cifre per le 
quali (tab. 6.2) il codice schermo è uguale al codice ASCII. 


Ivscrciziti 6.6 


Scrivere l'ora in mezzo allo schermo^ L'ora deve essere 


da soia sullo schermo ed apparire tri coniraslo invertito. 


L'Istruzione GET 


Adesso che sappiamo scrivere l'ora in un posto fisso dello schermo, 
possiamo apportare un miglioramento spettacolare al nostro pro¬ 
gramma di gioco del capitolo precedente. 

Quale angoscia per il giocatoe nel vedere i secondi susseguirsi sullo 
schermo mentre cerca il numero da indovinare’ 

Per vedere meglio l'essenziale, partiamo da una versione semplificata 
del programma B.S^.Si 

PROGRAMMA B.5B 


te PRINITl":TI*-"000000" 

20 IF TI>3600 GOTO 70 
30 PRINT'NM,PROPOSTO"j 

35 FOR 1*»3 TO 6 .POKEiese+l, ASCIMID*CTI*, I >> : FaKE5532S+I. 

0-KEST 

40 INPUT R 

50 E-100#RBSCR-C>/CaF E<1 GOTO 90 
60 PRINT'ERRORE'JINTCE>j"K":OOTO 20 
70 PRINT'^FERSO! " =0010 90 
00 PPIHT"VINTOI“ 

90 ÌWP0T''RlC0}1INCIAri0";fl*: IF n*-"Sr'^ GOTO 10 


Le semplificazioni che abbiamo portato sono ovvie: abbiamo soppres¬ 
so qualsiasi gestione dei vari giocatori, semplificando il trattamento 
degli errori, e portato al minuto il tempo limite. 

La fine del programma è degna di attenzione: si chiede al giocatore se 
desidera ricominciare e si analizza la stringa di caratteri formata dal¬ 
la sua risposta: è una cosa molto usata in tutti i pregrammi detti 
'interattivi". 
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Abbiamo messo il messaggio 'NM-PR-OPOSTO' (lìnea 50) in un^ìstru- 
zione PRINT disiima da INPUT. Infatti è in mezzo ad esse che si col¬ 
locherà la stampa delPora. Si scrivono nella parte destra della prima 
linea delio schermo le cifre dei minuti e dei secondi di TI$ mediante 
IMstrnzione 35, 

Proviamo il programma ottenuto in tal modo. 

Non funziona come vogliamo: non vediamo scorrere il tempo mentre 
il giocatore esita a dare il suo numero. 

Tutto proviene dairistruzione INPUT, Quando un'istruzione INPUT 
si esegue, i! programma rimane bloccato finca quando si preme il ta¬ 
sto 'Return', Intanto, nulla puù essere fatto. 

Quello che ci vorrebbe, è un'ìsimzione che guardi se abbiamo battuto 
un carattere alla tastiera e che ridia il controllo all'utente in ogni ca¬ 
so, Si potrebbe quindi seguire 11 seguente schema a blocchi: 



Ebbene il C64 dispone di una tale istruzione, CET. GET B$ fornisce m 
B$: o U carattere siti quale abbiamo premuto^ oppure ìa siringa vi40ta 
se non abbiamo premuto alcun carattere: proprio quello che cì vuole. 
Applicando esattamente il precedente schema a blocchi, otteniamo: 

PROGRAMMA B.5C 


10 PR = C-1 +95#RNI3 U ) ■ T“ 00000® " 

20 PR I NT " Ntl. PR OPOSTO? i 


25 

30 IF TI>3É00 


GOTO 70 
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33 OET fi* 

35 FOR 1-3 TO é^POKE 1036+1/flSCCniD*<ri$,I)?■P0KE5532©*!. 

0=WEXT 

3? IF GOTO 30 

3^ !F Bf-CHR*<13> GOTO 45 
41 R»-Rf+B#:PFeiNT B*J ^ GOTO 30 
45 R*VRLCR*JSPRINT 
50 E-100#filSCft-C>/C=IF ECl GOTO SS 
60 PRINT"ERR0RE’';IHT<E>J "M"100T0 20 
70 PRINT"PERSOI’■ 'GOTO 90 
90 PRiNT'-ViNTOr' 

90 INPUT"RICOI1INCrRMG";flt: If Rt-' SI" GOTO 10 


Ci Umiteremo ora ai commenti essenziali. Il cambio dell'ordine di 20 
e 30 è os^seoziale affinché si passi ad ogni momento sul te$t del tem* 
po, dì modo da essere ben sicuri dì non lasciare più di un minuto. No¬ 
tiamo che, in 20, viene stampato esplìcitamente il punto interrogati¬ 
vo; GET non lo dà, ali inverso di INPUT. Parijnentì con GET, siamo 
costretti a controllare rimpaginazione^ ciò giustifica gli spazi in 20 e 
60^ e siamo costretti a stampare i caratteri via via che li troviamo, e 
questo giustifica ii PRINT in 4h 

tje linee 25, 33 e 41 costruiscono progressivamente la strìnga AS par¬ 
tendo da un valore iniziale 'stringa vuota^ Ogni qualvolta è disponì¬ 
bile un carattere B$^ esso viene concatenato con la stringa A$ già ot¬ 
tenuta: A% — A$-FB$, Si noti pure come, in 36, venga testato il carat¬ 
tere 'R^tum'! si poteva fare: 3^ IF B$ = ' Return V poiché il ' Re¬ 
turn " termina spietatamente La lìnea. Potevamo anclie scrivere: 

39 IF ASC{E$)= 13. 

Consigliamo vivamente di adattare quest'ultima versione dì B.5 a 
B.IO che avevamo ottenuto nel capitolo precedente; praticamente, 
cambiamo soltanto i numeri d'istruzione. 

Vediamo che, in pratica, J'istruzione GET 'coglie" i caratteri uno per 
uno sulla tastiera. Questo permette una migliore interattività tra 
l'utente e la macchina. Ad esempio, alla fine di B.5C, potremmo inco¬ 
minciare non appena l'utente ha battuto S di SI, uscire non appena 
batte N, invece di aspettare SI ' Retum ". Questo permette di reagire 
più in fretta a ciò che l'utente batte: è necessario, soprattutto quan¬ 
do, ad esempio in un gioco di battaglia di carri armati, la pressione 
di un tasto simula un tiro. 


ItsL'i'cizio 6.7 


B.5C 


Faie ia modifica necessaria aita fine dei programma 


IsìiaijulQuII È spesso utile inserire in un programma un punto d'at¬ 
tesa! ciò permette di fermare un messaggio affinché l'utente ne prenda 
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conoscertiiL Motto spesso, si decide che basta, per continuare, che 
Putente prema qualsiasi tasto. Create la sequenza che attua questo 
cornportamento* 

programma CJB somiglia parecchio al comporta¬ 
mento di un orologio a cucii. Affinché h somiglianza sia completa, ba¬ 
sta che alle ore x Omn Os un cucii appaia alla porta. Fatelo. Fate lam- 
peggiare il cucù mentre appare. 

Carta di Francia 

Per mostrare la nostra padronanza dei grafici, disegneremo un profi¬ 
lo della Francia. 

Per tale disegno, non è possibile procedere come per la casa, cioè pre¬ 
parando il tracciato sullo schermo e mettendo i PRINT. Infatti, alcu¬ 
ni caratteri verranno fatti in reverse (ad esempio non esìste : lo si 
ottiene per inversione dì * ossia "Rvs " ‘Shift'ì). Ora, i caratteri in¬ 
vertiti si ottengono soltanto usando i 'Rvs' programmati, esplicita¬ 
mente messi tra apici. 

L'unico metodo è il seguente: sovrapporre una caria di Francia e una 
quadrettatura geometricamente simile alla 'maglia' dello schermOn 
Usate una griglia di 4 mm di larghezza su 5 mm di altezza. Poi. cerca^ 
te/riga per riga, i caratteri che più sì avvicinano alle curve da 
riprodurre. 



Si vedono, qui sopra, il Cotentin (Normandia^ e rapprossimazione 
scelta (in scala 2), dal che seguono i caratteri nei quadratini: 


1. ‘C^'l 

5,. 

Rvs^'C = 'U 

2. 'C = 'F 

6. 

Rvs" 'C=‘ J 

3. Rvs‘ 'C = ' G 

7. 

Rvs" ’C = ' U 

4. Rv? C ^ ' C 

8. 

Sv? ’C*’ V 


Ovviamente, i pieni si fanno con Rvs ^ Sp, 

Ne segue il programma C5, La linea 1045 serve ad impedire la stam¬ 
pa di READY, L'abbiamo già usata. 
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1010 PF?1HT'^T' 




10U PftlNT ' 


«r Wm" 


10l£ PRIKT" 


Si “1_" 


1613 PRINT“ 


-sr i 


1014 PRINT** 

m 

ar 

vp rii 

1015 PRINT" 

tà - 



1016 PRINT' 

a 


t" 

1017 PRINT" 

tk “ 


■Vh 

101E PPUIT'^ 



i" 

1619 PRIMI" 

—'a. 


■" 

1020 PRIMI" 

“a 


^^pii 

1021 PPINT” 

•a 


W" 

102Z PRINT^ 

’4Bì 



1023 PRIMI” 

'■a 


Mm" 

1024 FRI hit 




1025 PRIMI" 




1026 PPINT 



W" 

1027 PRIHT” 

IS) 


&" 

102S PPINT” 

la 


W' 

102? PRIMI ' 

31 


<1 

1030 PRIMI" 

a 


W’ 

1031 PRIMI" 

sr 



1052 PRIMI" 

‘a 

w 


1033 PRIMI" 

•1 

fl. 


1034 PRIMI" 




1040 GOTO104ì:i 






Chiediamo ai lettori Corsi dì volerci scusare per non 
aver fatto figurare la loro bella isola sulla nostra car¬ 
ta. Per risarcirli, proponiamo Tesercizio seguente; 


rscivizio 6.10 


Cartografaie 
delia grigHa qui di fronle. 


la 


Corsica cofi 


lLserci/ii> 6.10 lìiii 


_ Pale alio stesso modo una carta 

deWìtaiia, o della Svinerà, o dei Canada, 


Dobbiamo notare che i risultati sono abbastatìia mediocri: at momen¬ 
to siamo in "grafica bassa risohiziorte"; Fatta risoluzione (prossimo ca¬ 
pitolo) ci permetterà di migHorare parecchio. 

Quiz geografici - 1 sottoprogrammi 


Adesso che disponiamo di una carta di Francia, potremmo usarla per 
giocare ad un gioco utile. Ci permetterà di rivedere le nostre cono¬ 
scenze geografiche* Si tratta di riconoscere la posizione delle princi¬ 
pali città francesU Sì può giocare in due modi, e lì attueremo 
entrambi. 
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A* Il programma fa lampeggiare un quadratino sullo schermo; avete 
20 secondi per battere il nome della città che vi si trova, 

B, Il progràmina dà un nome di città. Eiovete, con l'aiuto dei tasti 
movimento del cursore, portare il caratterefC = ' + ) sulla po¬ 
sizione di tale città. 

Battete Retum quando siete soddisfatti della posUione raggiunta. 
Ovviamente, disponete di un tempo limitato. Questa è la base dei 
programmi d^ìnsegnamento guidato da computer, ornriai diffusis- 
simin Maiuralmente, li si possono perfezionare esaminando gli er¬ 
rori commessi, visualizzando indicazioni per aiutarvi e tenendo il 
conto dei risultati. 

Abbiamo visto in precedenza tutti gli elementi che permettono di 
farlo: ora ci limiteremo alle soluzioni più semplici. 

Il programma segue lo schema a blocchi generale qui sotto: 
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Questo $chema è semplificatOn QueUo che appare fondartiental¬ 
mente è che, in due postì^ bisogna eseguire la stessa operazione: 
visualizzare la carta di Francia. Il programma della carta è di pa¬ 
recchio troppo lungo per ripeterlo in due posti. Andrebbe bene di¬ 
sporre del meccanismo seguente (cfr. figura qui sotto). 


lOO ANDARE IN 1000 
200 ANDARE IN 1000 

lOOO CARTA 
1040 RITORNO 



’T. 




Il programma da ripetere viene 
scritto una volta sola, dalla li¬ 
nea 1000 ad esempio. 

Ogni qualvolta dobbiamo ese¬ 
guirlo (qui in lOO e 200) una 
istruzione simile ad un GOTO fa 
saltare in 1000, dove viene ese¬ 


guita la sequenza. 

La sequenza termina con una istruzione che vuol dire ^Tornate da do¬ 
ve venite^ Essendo venuto dalla linea lOO, tornare subito sotto 100 
(percorso in tratto pieno). Essendo venuto da 200^ tornare subito sot¬ 
to 200 (percorso punteggiato). 

In pratica, si tratta di un meccanismo di salto che si ricorda da dove 
viene. Questo mecca ni smo esiste in Basic. 

Il programma usato più volte si chiamò sottopjxjgramma. Listruzio- 
ne di salto verso il sottoprogramma fe Fistruzlone dì richiamo GQ- 
SUB : 100 GOSUB 1000. 

L'istruzione dì ritorno si scrive semplicemente RETURN (le lettere 
RETURN , non il tasto Return ^. 

Il programma ha quindi la strutturai 


4 

ioo GOSUB lOOO 
+ 

200 GOSUB 1000 




^programma principale 


iooo 

1040 'return 


[sottoprogramma (qui lì tracciato della carta 
f di Francia) 


j 


Questa struttura è estremamente importante e potente. Un program¬ 
ma può richiamare diversi sottoprogrammi. Ogni sottoprogramma 
può richiamarne altri. In ogni caso, il C64 vi sì raccapezzerà ed effet¬ 
tuerà i ritorni 

Una volta acquisita questa semplificazione del nostro lavoro, cì serve 
una lista di città con il loro nome e, per ciascuna di esse le sue coor¬ 
dinate. I (da 1 a 25) e J (da l a 40) che la localizzano sullo schermo. 
Naturalmente, tali coordinate saranno approssimative, così come il 
disegno della carta. 

Ci limiteremo in questo caso alle 11 seguenti città (ciò evita le istru¬ 
zioni DIM, e nulla vieta di aggiungerne ulteriormente). 
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Chtà 

I 

J 

N 

Clità 

[ 

J 

N 

Parigi 

7 

22 

0 

Nantes 

1t 

12 

6 

Marsiglia 

22 

29 

1 

Strasburgo 

7 

34 

7 

Lione 

15 

27 

2 

St-Etienne 

16 

26 

8 

Tolosa 

21 

20 

3 

Le Havre 

4 

17 

9 

Nizza 

20 

24 

4 

Lille 

2 

23 

10 

Bordeaux 

17 

15 

5 






I preliminari del programma sono quindi semplici. La tabella prece¬ 
dente viene messa sotto forma di DATA {linee 10^ 15j, 20) che vengono 
poi letti (linee 30 e 40), Poi, viene ìa scelta del modo (linee 50 e 60) 
(per un uso reale del programma, si dovrebbero stampare più spiega¬ 
zioni di quello che Facciamo). 

Prima di battere questo programma, caricate il vostro programma 
carta di Francia e aggiungete una linea 1000 REM con, eventiialmen- 
te, una spiegatone del sottoprogramma. Cambiale la linea 1040 in 
1040 RETURN. 

PROGRAMMA C.6. QUIZ GEOGRAFICO 

10 DATA PRR lOI.MRRSlOLlfìjL IONE. TOLOSH. HI ZZR. BORDEAUX. NfiKTES, 

13 DRTR ‘ SRINT ETIENNE". “LE HRVRE''. LILLE 

20 DRTR 7.22.22.29. 15.27,21.20,20,34^ 17. 15. 11 . 13^7.34, le.25^.4. 

30 FOR^^-0TCH0:REHD N0M*CV?:NEXT 17,2,23 

40 FORV-0TO10:RERD II(V>,JJ<V) 

50 INPUT TIR □ B";X* 

55 V«=1NTCU#RND<1?) T-TI 
60 IF OOTO 500 

In realtà, il sorteggio della città e Pinizializzazione del tempo sano co¬ 
muni e andranno in 55: 

55 V = ÌNT(11 * RND(l)) r T = TI 

Gioco A 


Ci troviamo dopo 70: 


70 PRINT"GIOCO fì:pRTTET£ JL NOME DÈULH CITTH CHE LAMPEOGIfi 

POI SFETORH" 

72 FORI-lTQl00e NEKT 
75 IJ='1023+40#<U(V?-1>+JJ<V? 

80 GOSUB1000 Rf - ^ POKEIJ. 42 = K-O 

85 IFTI-T>I200GOTO170 

90 P-PEEKaJJ :Qs»p+i2S#SGN(:j2e-P> :PUKeU.Q 
95 OET GOTO 85 
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100 1FB*-CHP*<13> COTOÌSQ 

105 K:=>K+1:L-RSC<B$;i“ 64 IFL<0rHÉN L’*L+64 

110 POKEie23+K.L :pOKE5583'5+K, :[50T0 75 

150 ip GOTO lee 

160 PffINT"3^0"'FOPI-^1TO30O:MEKT-OOTO 75 

170 PRINT^'IT'ERSO" ^eOTOlSe 

LS0 PRIHT":if'INTO^^ + 

180 INPUT■■awoff^ICOMENClFinD"ifìf 
195 IF OOTO50 

260 END 

Il programma è costruito con materiale già visto, particolarmente la 
costruzione carattere pei‘ carattere del nome AS della città proposta 
dall'aliinno (istruzione 30 a UO)- 

In 72 e in 160, pause per fermare il messaggio visualizzato^ 

In 75, U È l'Indirizzo sullo schermo della città cercata. 

In 80, il 42 è il codice della stella che stampiamo alternativamente in 
normale o in reverse perché lampeggi. 

In 90, facciamo lampeggiare la stella: P è il carattere attuale. 0 è 
P+ 128 se P> 128 e P —128 se P< 128 (mediante la funzione segno). 
Quindi Q è comunque Tinverso di P. 

In 105-1 IO, stampiamo il carattere trovato; ma è meno semplice che 
con le cifre: dobbiamo togliere 64 per ottenere il codice schedo, 
tranne che per il carattere spazio che abbiamo già in due città. L'indi¬ 
rizzo di inizio 1623 assicura che il nome venga battuto in mezzo ai 
Golfo di Guascogna! Il POKE 55895,.. assicura che la scrittura avven¬ 
ga in azzurro e non in blu scuro su blu scuro. Il resto dei programma 
non dovrebbe creare difficoltà; passiamo quindi al gioco B* 


Gioco B 


Questa volta siamo dopo la linea 500 

500 FRI NT"G loco B CON I TP3TI CURSORE^ PORTATE S? 8ULLPI CITTR 

305 PRTNT ■MMtP»l»'V; NQPH:CV> ■ POR1=1TO2000 NEXT 

510 

515 OQSUB 1000 

320 IJ=iig33+40!|fCl-l>+J = P*PEEKCLJ? .POKEIJ. POKFlJ+54272/ M 

523 IFT1’T>?20OGOTO170 

530 OETR* lFPlf-^‘'"00T0525 

335 IFR*“CHRf<13)0010570 

540 IFfìf-"W"THENI=T+l 

545 IFRt-"n"THENl=^I-l 

350 IFn#-"irTHEHJ-U+l 

553 lFft<:^''tl''THENJ=J-l 

560 POKEU^R;GOTO520 

570 IF I"IKV) FIND GOTO 1S0 

575 PRINT“::M0''' FORR*3-TO500'NE^tT : GOTO 515 
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I e J miziali?./^li ad }, indicano la posizione del cursore grigio (codice 
schermo 102), indirÌ7:io schermo IJ. 

Dì nuovo, per molivi di interattività, usiamo GET per Tesarne dei ta¬ 
sti preinutL A seconda del tasto usato, il movimento viene effettuato, 
cioè I o j vengono modìFicati. Il tasto ' Retum * viene testato da CHR| 
dato che non lo si può mettere tra apici. Il itiovimento. linea 5ó0 e 
520, viene effettuato rimettendo il vecchio contenuto A in U. Il nuovo 
U viene quindi calcolato^ c il cursore grigio spostato in questa nuova 
posizióne* 

Quando l'utente batte ^Return', la 1 e ia J raggiunte sono la posizione 
proposta. Questa viene confrontata coi dati della tabella II e JJ. Si no¬ 
ti Tuso della variabile R per la sosta in 575 in modo da non modifica¬ 
re I usato altrove] 

L'ordine delie istruzioni, in 510, 515 c tale che quando la risposta è 
NO un altro tentativo è possibile. Si riprende in tal caso dalla posizio¬ 
ne proposta nel tentativo precedente, il che permette di raggiungere 
la meta con piccole correzioni successive. 

Per rinsieme dei tentativi, il tempo limite è dì 2 minuti (contro 20s 
nel gioco A). 


RICAPITOLAZIONE 

Questo ptvfiramma, che è l'archetipo dei programmi usati nell'mse- 
gnametìto guidato da compuferr utilizza sultanlo tecniche semptici 
che sono state introdotte progressivamente nel corso dei gioco ''jnd'ovj- 
fìa un numero' e per la programmazione del disegno di una casa. 
L'unica tecnica inìrodotta qui — ed essa è importante — è quel¬ 

la dei sottoptogrammi. 

Con un semplice GOSUB, il tracciato della carta di Francia viene effet¬ 
tuato ogni volta è necessario nel programma. 

L'istruzione GET porta pure una buona interattività nel diaiogo 
uomo^macckina^ esseriziaìe questa applicazione. 

Non proponiamo qui alcun esercizio su questo programma, costruito 
passo per passo, ma non incKìraggeretno mai troppo il lettore ad eserci¬ 
tarsi ad apportarvi tutte le modifiche che giudichi utile provare. 
Potete in particolare ispirarvi alle ultime versioni del programma B 
per gestire i 'punteggi* ottenuti da vari alunni. Pateie anche cambiare 
ì tempi e aggiungere città (in tal caso„ attenti a 

•I 

Nota: 

// soiloprogramma carta di Francia è stato scntto da 1000 in poi, in 
modo da permettere l'uso in diversi programmi. Immagazzinatelo su 
cassetta, e quando desiderate incorporarlo ad un programma da scri¬ 
vere, caricatelo per prìmo. Poi scrivete il vostro programma da 0 a 999. 
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Questo modo di procedere, che ci evita la fastidiosa copiattAra di una 
parie dei programma, si può generalizzare, Mti attentiì Potete usarla 
una soia volta per programma. 

Ora dobbianno vedere alcuni aspetti particolarmenie spettacolari del 
C64: il colore ed il suono. 


IL COLORE 


Nel corso dì questo libro abbiamo già fatto qualche allusione ai co^ 
mandi di colore. Ora si tratta di precisare tutte le possibilità offerte 
dal C64 in questo campo. 

Così come le scritte sullo schermo possono essere fatte con dei 
PRINT o dd POKE, i comandi colore sono al livello elementare con 
PRINT e ai livello elaborato con POKE. Alcuni comandi sono accessi¬ 
bili soltanto con FOKE. 


Comandi elementari 


Il comando più elementare consiste nel dire 'il prossimo carattere 
che stamperemo, voglio che sia. ad esempio, in rosso** Lo si fa molto 
sempiicemenic mediante i tasti dì comandi di colore sulla lina dì so¬ 
pra della tastiera: il comando dì colore si ottiene premendo simulta¬ 
neamente il tasto ' Ctrl '* 

Ad esempio se battete la sequenza; 

XtrPGRN XXX XtrF PUR YYY 

otterrete ti-e X verdi e tre Y porpora. 

NB. All'accetisione i caratteri vengono stampati in azzurro (su blu 
scuro), 1 caratteri di controllo di colore possono essere messi tra api¬ 
ci per agire in modo differito al momento deiresecuzione del pro¬ 
gramma* Anche in questo caso, vengono rappresentati con un motivo 
in contrasto invertito. 

La tabella 6.3 completa le tabelle 6.1 e 6.2 con i caratteri di colore. 


Esercizio 6.1 1 


escluso). 


Coprire lo schermo di stelle di colori casuali (bianco 


Lo sfondo e il quadro 


Perché c'è un colore blu quando, se chiediamo dì scrivere caratteri 
blUj non li vediamo sullo sfondo blu dello schermo? Ebbene, perché 
possiamo cambiare il colore dello sfondo. Ciò si fa con POKE ad un 
indirizzo che, in realtà, è uno dei registri del circuito integrato 6567 
che gestisce tutto quello che viene visualizzato dal C64. Questo circuì- 
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Tab. 6.3. I caratteri di comando di colore. 


Rapprtrsentazlonc Rappretcntazicme Codice ASCII EffeUo 

del libro C vuol visibile C64 {CIIRS^) 

dire con 'Cirt) 


Blk^ 


144 


Nero 


Wht' 


Red^ 1 


Cm" 


Pur* 


Gm* 

3 

Blu" ' 


Yel" 




.Whi 

cRed 


c^yii 


ePur 

+ 

cC 1 E li 

! 

fBtu 

♦ 

cYel 

-h 


5 

Bianco 

2% 

Rosso 

159 

Turchese 

156 

Porpora 

30 

Verde 

31 

Blu 

I5S 

Giallo 

129 

Arancione 

149 

Marrone 

150 

Rosa 

151 

Grìgio scuro 

152 

Grigio media 

153 

Verde chiaro 

154 

Azzurro 

155 

Grigio chiaro 


to integrato si chiama VlC (Video Interface Chip = cassetta di inter¬ 
faccia video). È tanto importante e sofisticato quanto il microproces¬ 
sore. 

C'èp nella cassetta VlC, un certo numero di registri ìJ cui contenuto 
può essere cambiato da POKE. Il contenuto determina la gestione di 
quello che viene visualizzato; quindi un modesto POKE può modifica¬ 
re, in modo spettacolare, quello che appare sullo schermo. In questo 
libro non vedremo che i principali registri e i ptincipali effetti che si 
possono ottenere. 
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I registri d'indirizzi risp^jttivi 532SI e 532S0 determinano il colo¬ 
re dello sfondo dello schermo come pme quello del quadro (sul 
quale non viene mai scritto nessun carattere), secondo il codice in 
4 bits; 


Tab. 6.4, Codice dei colori. 

ri 

Codice'(■ 

Colore 

Codice 

Colore 

0 

Nero 

8 

Arancione 

1 

Bianco 

9 

Marrone 

2 

Rosso 

LO 

Rosa 

3 

Turchese 

! 1 

Grigio scuro 

4 

Porpora 

92 

Grigio metlio 

5 

Verde 

13 

Verde chiaro* 

6 

Blu 

14 

Azzurro 

7 

Giallo 

35 

Grigio chiaro 


+ Se il colore si ottiene con 'Ctrl' tasto n, vediamo clic codice = n—L 

* In questo caso "chiaro" = meno saturo, cioè mischiato a del grigio. 

Ad eccezione deiharancione e dei grigi, se si ammette che rosa “ ros¬ 
so chiaro, si vede che chiaro = codice + S, 


Si nota che airaccensìone tutto si svolge come se ci fosse POKE 
53281,14: POKE 53280^6 (quadro azzurro, sfondo blu). 

Dobbiamo notare che parecchi messaggi si possono ottenere almeno 
in due modi; ad esempio, per ottenere una A porpora su sfondo verde, 
potete mettere uno sfondo verde, poi stampare ^ Pur ^ A". Ma potete 
mettere anche uno sfondo porpora e stampare “ Grn^ Rvs ^ A", 


li,sei'cì/Ìo 6.12 


(macabro). Preparare urta partecipazione di morie. 


Esci'cizlo 6,1 3 


Vorremmo la Frància in giallo su sfondo hlu oceano. 


Ottenimento dì colori mediante POKE nella memoria 
di schermo 


Abbiamo già visto che il C64 possiede due memorie di schermo di 
1000 bytes (1000 = 25 linee x 40 colonne). Ogni byte corrisponde ad 
una posizione sullo schermo. La prima memoria (che inizia in 1024) 
contiene i codici^arattere di ogni carattere da stampare. La seconda 
(che inizia in 55296) è, in realtà, composta da quartetti {sono presenti 
soltanto ì quattri.3 bits a destra). Ciascuna di queste celle contiene un 
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codice su quattro bit che determina il colore dì stampa del carallene 
che si trova nella posizione corrispondente sullo schermo. 

Qual È La corrispondenza tra il codice ed il valore? Ci sono due casi in 
funzione del bit 4 deU'mdirizzo 53270* 

— Bit “ 0, È il modo più normale. Il codice colore di stampa del carat¬ 
tere segue la corrispondenza già vista (tabella 6,4); O; nero, h bianco, 
2: rosso.,. 7: giaho... 15: grigio chiaro). 

In questo modo, possiamo quindi avere due colori in una casella 
schermo: o il colore dello sfondo (16 possibilità), oppure il colore ca¬ 
rattere determinato dal codice (i6 pùssibilltà), 

— Bit=I, È un modo più complicato (modo multicolore) che min 
verrà studiato in questo libro, con Taiulo del quale possiamo, in ogni 
maglia di schermo, avere 4 diversi colori. 


l'^sei'cizio 6.14 


Disenniìre iù bandiera olandese sullo schermo. È più 
facile delia bandiera italiana. Perché? 


EFFETTI SONORI 

Eccoci ad una sezione che farà molto chiasso! Infatti il C64 è capace 
di comandare Taltoparlanie del televisore al quale è collegato per 
produrre suoni* Per tutta la sezione, regolate il volume del suono del - 
vostro televisore ad un valore confortevole (suggeriamo 1/3 del massi¬ 
mo). Se il volume è a zero, non sentirete alcun suono e quindi, crede¬ 
rete che ì vostri programmi sonori non funzionano o, altrimenti, che 
gli effetti sonori del vostro C64 siano guasti. Ciò può succedere però, 
prima dì supporlo, verificate sul vostro televisore. 

Per produrre suoni, il C64 è fornito di un circuito integrato particola¬ 
re^ il SID 6581 (Sound Interface Device; circuito d'interfaccia sonora) 
che È un autentico sintetizzatore. Il processore lo vede come un insie¬ 
me dì registri. È estremamente complesso e, in questo libro, vedremo 
soltanto gli elementi più semplici. 

Sì ottengono gli effetti sonori mettendo dei valori nei registri, con 
POKE, agli indirizzi voluti. 1 registri sì dividono in registri generali e 
registri associati alle tre "voci" capaci di funzionare simultaneamen¬ 
te. Le tre voci funzionano pressapoco allo stesso modo. 

Per ogni voce, si possono controllare ì seguenti parametri (citiamo 
qui di seguito i nomi simbolici per Sa voce IJt 

— la frequenza, sotto forma dì un numero dì 16 bits, dunque due re¬ 
gistri LI (parte bassa) e HI (parte alla); 

— la forma d'onda triangolare, dente di sega, raltangolo e rumore 
bianco. Il registro che corrisponde alla voce 1 ha per nome simbolico 
WL Obbedisce allo schema seguente; 
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eh 

? 

6 

5 

4 

5 

2 

1 

0 

m 

Burnof* 

_1 

nn 

D«nt« & 
B4da 

MA 

Tcianyoh) j 

M0*1 \Ji5i 

m In (|W 3 

to tìtUQ 

I 

I_ 

Rotta 


Per attivare un suono di una data forma, bisogna assegnare I al bit 
corrispondente e assegnare L a "porta'. Con "porta" a 0, si entra nella 
fase di rilassamento del suono. 

— rmvoiucro del suono. L'intensità dì un suono passa da 4 fasi (figu¬ 
ra qui di fronte) che determinano l'involucro del suono o ADSR: 

A = attacco (crescita del suono); 
D = discesa verso la soglia; 

S = Sostégno a soglia; 

R = rilassamento; 

A e D occupano ciascuno 4 bits del 
registro Al. 

A (bits 4 a 7) varia da 0 a 15, il che 
corrisponde ad una durata da 2 
ms a à s; 

D (bits 0 a 5) esprime una durata 
da 5 ms a 24 s; 

S e R occupano ciascuno 4 bits del registro SI. S (bits 4 a 7) da 0 a 15 
esprime il Uvello di soglia da 0 a 100^6 rispetto alla vetta della salita. 
Ad esempio, nella figura qui sotto, la soglia è a mezza altezza della 
vetta: avremo dunque S = fi. R occupa i bits da 0 a 3 ed esprime una 
durata di decrescita da 6 ms a 25 s. R è poco usato in pratica: non ci 
si occupa di fermare un suono: si fa partire la nota successiva. 
L'inviluppo è molto importante per l'imitazione degli strumenti mu¬ 
sicali: la figura qui sotto dà qualche esempio 




Quando la forma d'onda è rettangolare, bisogna definirne il rapporto 
ciclico (TI/T nella figura qui di seguito). Tale rapporto è definito da 
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un numero di 12 bits espresso in 1/4096 esi¬ 
mi, riposto nei registri CI (parte bassa) e DI 
(parte alta). 

Dunque ci sono 7 registri per voce, ossia 21 
registri a! quali vengono ad aggiungersi S re¬ 
gistri generali (che agiscono su tutte le voci). 

In questo libro, useremo soltanto il registro V i cui bits 0 e 3 defini¬ 
scono il volume del suono {0~ silenzio, 15 = suono più forte 
possibile). 

Gii indirizzi sono indicati nella tabella seguente: 



Tab. 6,5. Registri spnoH del C64^ 


Nome 

Simbolico 

Indirizzo 

Funiloiw 

LI 

54272 

Frequenza [parte ba$$a) 


HI 

54273 

Frequenza [parte alta) 


CI 

54274 

Rapporto ciclico (p. bassa) 


DI 

54275 

Rapporto ciclico (p. alta) 

- voce 1 

W1 

54276 

Forma d'onda 


Al 

54277 

Attacca/di scesa 


SI 

54278 

Sostegno rilassamento 


L2 

54279 

Frequenza (parte bassa) ^ 


H2 

542S0 

Frequenza (parte alta) 


C2 

54281 

Rapporto cìclico (p. bassa) 


D2 

54282 

Rapporto ciclico (p. alta) 

^ voce 2 

W2 

54283 

Forma d'onda 


A2 

54284 

A t tacco/discesa 


S2 

54285 

Sostegno rilassamento ^ 


U 

54286 

Frequenza (parte bassa) ^ 


H3 

54287 

Frequenza (parte alta) 


C3 

54288 

Et^pporto ciclico (p. bassa) 


D3 

54289 

Rapporto cìclico (p. alta) 

voce 3 

W3 

54290 

Forma d'onda 


A3 

54291 

Attacco/d ì scesa 


S3 

54292 

Sostegno rilassamento 


FB 

54293 

Frequenza filiro (3 bit a destra)* 

FH 

54294 

Frequenza filtro (bits 3-10)* 

RF 

54295 

Risonanza/Fi 11 raggio* 

V 

54296 

Bits 0-3: volume; btis 4-7: modo filtraggio* 

PX 

54297 

Lettura potenziometro X" 

PX 

54298 

Lettura potenziometro Y* 

03 

54299 

Lettura oscillatore voce 3* 

E3 

54300 

Lettura involucro voce 3* 


* Non u&Bto in quello libro. 
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Per ottenere un suono, la sequenza di operazioni è ora abbastanza 
semplice: 

1. definire gli indirizzi simbolici usati: L = ... H = ... V ; 

2. definire la frequenza con POK.E L. POKE H, ... seguendo la ta¬ 
bella 6,2, Definire il rapporto ciclico se necessario; 

3. definire l'Involucro con POKE A, ... POKE S. 

4. fissare un valore del volume, ad esempio POKE V, IO; 

5. lanciare il suono con POKE W, con "porta" = ì, quindi 17; trian- 
golox 33; dente di sega, 65: rettangolo^ 129; rumore; 

6. generare rìniervalìo dì durata della nota (con un ciclo o con TI o 
qualsiasi altro metodo); 

7. iniziare la fase dì rilassamento con POKE W, ... con "'porta* =0, 
quindi valore 16, 32, 64 o 128; 

3. fermare tutto con POKE 0 a tutti gli indirizzi. 

Note: l'operazione 5 lancia il Questo continua poi conforme¬ 

mente al proprio inviluppo fino airarresio con POKE 0 (o STOP RE- 
STORE} Q inizio di un altro suono. Questo permette di lanciare simul¬ 
taneamente fino a ire suoni per fare degli accordi 
In pratica, quando si fanno sequenze di note, non si effettua Vopcra- 
zione 7: si inizia il suojìo swccei'.siVù. Prima dell'inizio di qualsiasi suo- 
nOt è preferibile azzerare il SID con un'operazione 8. 

Si possono mischiare due forme d'onda in W (esempio 97), ma il rumo^ 
re non deve essere mischiato. 

La tabella 6.6 dà i valori delle note (valori approssimativi poiché di¬ 
pendono dalla frequenza deirorologio e dallo standard televisivo). 

Esempio: ecco un programma che fa trattenere il suono fino alla 
pressione dì un tasto qualsiasi- Usiamo la voce 1. 

10 V*54£9e ;^fl«!54£?7 = H-54a73 : L-54272 ’ S-R+1 

20 P0KE9j ? :POKEW ^ 33 = POKÈ3t:P0K£Sj 24B 

30 POKEH,17;P0KEL.73 

40 GETfli IF R**'"" 001040 

50 POKEW,0: POKER j 0 ? POKES 1 0■POKEV.0 


Valori da sperimentare 


w 

A 


w 

A 

33 

31 

Tromba 

17 

102 Gong 

97 

31 

Oboe (miscuglio di 2 




forme d'onda) 

!7 

0 Organo 

17 

31 

Fi all lo 

33 

9 Clavicembalo (S=0) 

33 

239 

Violino 

65 

9 Piano (S=0) 
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Tab. 6.&. Note sul Cé4. 


Nota 

t 

H 

Noia 

L 

H 

Nota 

L 

H 

Do 

IB 

1 

Do -2 

73 

4 

D o -4 

37 

17 

Do # 

35 

1 

Do# 

139 

4 

Do# 

43 

18 

Re 

52 

1 

Re 

208 

4 

Re 

63 

19 

Reti 

70 

1 

Re# 

25 

5 

Re# 

100 

20 

Mi 

90 

1 

Mi 

103 

5 

Mi 

154 

31 

Fa 

IIQ 

1 

Fa 

185 

5 

Fa 

227 

22 

Fai? 

132 

1 

Fa# 

16 

6 

Fa# 

63 

24 

Sol 

155 

1 

Sol 

108 

6 

Sol 

177 

25 

Sol# 

179 

1 

Sol# 

206 

6 

Sol# 

56 

27 

La 

305 

1 

La 

53 

7 

La 

214 

28 


233 

1 

La# 

163 

7 

La# 

141 

30 

Si 

6 

2 

Si 

23 

8 

Si 

94 

32 

Do -1 

37 

2 

Do -3 

147 

8 

Do -5 

75 

34 

Do# 

69 

2 

Do# 

21 

9 

Do# 

85 

36 

Re 

104 

2 

Re 

159 

9 

Re 

126 

38 

Re# 

140 

2 

Re# 

60 

10 

Re# 

200 

40 

Mi 

179 

2 

Mi 

205 

10 

Mi 

52 

43 

Fa 

220 

2 

Fa 

114 

II 

Fa 

198 

45 

Fa# 

B 

3 

Fa# 

32 

12 

Fa# 

137 

48 

Sol 

54 

3 

SoE 

216 

12 

Sol 

97 

51 

Sol# 

103 

3 

Sol# 

156 

13 

Sol# 

1 LI 

54 

La 

155 

3 

La 

107 

14 

La 

172 

57 

La# 

210 

3 

La# 

70 

15 

La# 

126 

61 

Si 

13 

4 

Si 

47 

16 

Si 

IBB 

64 

Do -() 

149 

68 

Sol# 

223 

108 

Mi 

210 

172 

Do# 

169 

72 

La 

88 

115 

Fa# 

35 

183 

Re 

352 

76 

U# 

52 

122 

Fa 

252 

193 

Re# 

161 

SI 

Si 

120 

129 

Sol 

133 

205 

Mi 

105 

86 

Do -7 

43 

137 

Sol# 

139 

217 

Fa 

140 

91 

Do# 

83 

145 

La 

176 

330 

Fa# 

354 

96 

Re 

247 

153 

U# -7 

103 

244 

Sol 

194 

102 

Re# 

31 

163 





Per il violino, bisognerebbe aggiungere del vibrato. 

Per il piano^ fissare il rapporto giclico a 1/2 con un POKE L+3,4. 


Esei'ci/it^ b, I à 


Nel gioco dei quiz geografico, quando il givaalorc ha 
vinto^ fate squUiare le prime noie della marsigliese, (re re, re sol, sol la^ 
la rCy si sol). 


Esercizio b^ltì 


Eserd/ìo &.17 


Fate sentire il cucii nel programma CA. 


(gioco di SìfdON — marchio depositato). Si stabilisce 
una corrispondenza tra i tasti colore e le note delia gamma, lì prò- 
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gramma scegìie £] cajo una sequefìza 4 note: la fa suonar^:, mpstran^ 
do coniemporaneamenie^ su tutto Ìo schermOt i cotori corrispondeniL 
Il giocatore deve quindi battere la sequenza corrispondente. Mentre 
preme un msto^ d pragramina suona la nota e visualizza il colore. Si 
autorizzano due tentativi per trovare una sequenza. 

11 generatore di rumori 


Con W = 129, non sì generano note ma nimori, cioè miscugli casuali 
di Frequenze (intorno ad una frequenza determinata dai numeri posti 
in L e H). 

Per giudicare gli effetti che possono essere ottenuti, la cosa migliore 
è sperimentare con U programmino che segue: esso genera un rumo* 
re e stampa il numero corrispondente a L + 256 * Tale numero cre¬ 
sce se premete '-f ’ e decresce se premete '— 

PROVA DI RUMORI 


10 PRINT' T'^POKE650. 126 

i5 V-5429e:Ll-34272:Hl-Ll+l■Wt-Ll+4:Fìl-Wl+l:St-fil+l 
20 ><-32000^ 1NC-100'POK£V^ 10 fPOKEPl ^ 3= POKÈSl ^240 
25 KH-I HT< K<^25e > : «L*H-25€l»lWH 
27 PR1NT"« 

30 

40 POKE L1,KL:P0KEH1>MH:P0KE Wt^l29 
50 OETR* 

60 IFflt*^'-“THENIF X>IHC THEN :O0T025 

70 lPfìf-'' + "TH£NlF XC65533-INC THEN J<-H+INC =007025 
80 IFflf-'' l'THEN It4C-INC-10 =001025 
90 IFR*»’^4''THEN INC-INC+IS :0OT025 
100 00T0Z3 


Il POKE 650 assicura che tutti ì tasti, dunque " + ’ e avranno ripe¬ 
tizione automatica. Si vede quindi che: 


intorno a 

abbiamo 

200^300 

rombi, macchine, esplosion 

1000 

vento, onde 

1300 

tempesta, lancia-fiamme 

ISOO 

biizzard 

2500 

reattori, fughe dì gas (3500) 

lOOOO 

fischi 


Mon si dimentichino gii effetti dinamici per variazione delle frequen¬ 
ze ù l'effetto di decrescila (sparo se A —23, $ = 0), 
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A* 18 


Un aereo sì avvicina, ci sorvola, poi si alloniana. 


Abbiamo, ormab esplorato più o meno tutte le risorse spettacolari 
del C64. Cì riiTiane il tracciato di figure, Tanimazione e l'alta 
risoluzione^ 





Capitolo 



Figure e disegni animati 
Grafici alta risoluzione 


Prima di affrontare i disegni animati veri e propri, realizzeremo un 
programma "se^io^ importantissimo per le sue applicazioni: il trac¬ 
ciato del grafico di una funzione, 

GRAFICO DI UNA FUNZIONE - ISTRUZIONE DBF FN 

Il programma non è, in realtà, complica ti ssi mo, Tracccrcmo il grafi¬ 
co della funzione esponenziale y = exp(jc), per x che va da 0 a L II 
grafico verrà tracciato punto per punto. Disponendo di 25 linee sullo 
schermo, potremo rappresentare 23 punti. 

Sulla linea f verrà nnateriaUzzato il punto corrispondente ad x =^724, 
L'asse delle ascisse in questo caso è verticale, orientato da sinistra 
verso destra. Esso può variare da 1 a 40. Su di una linea data, verrà 
stampata una stella nella colonna li cui numero è proporzionale al 
valore di y per Vx corrispondente alla linea. 

Bisogna dunque applicare alla funzione un fattore di scala, affinché 
vari tra 1 e 40 di modo da coprire tutto lo schermo. 

Per la funzione exp, useremo: 

> = 39.texp{j)^l)i/(e—1)+1 

La formula generale per una ftmiione f(x} il cui massimo e minimo 
tìetl'inteniaUo di variazione studialo sono rispetthfamente max e min 
sarebbe: 

y~ i + f39.(f(x}^min)y(max^min} 

Per stampare il grafico, basta quindi realizzare un ciclo FOR X — ini¬ 
zio TO fine STEP inten-'allo, e per ogni punto una stella nella colonna 
INT(y). 



96 Ld scap«rta del Commodore 64 


Ba.sic dispone di due funzioni semplici a questo scopo: 

PRINT TAB(N^ posiziona sulla colonna N 

PRINT SPC(N}; fa stampare A/ spazi dunque posiziona stf N + I 

Il programma da realizzare ne deriva direttamente: 

PROGRAMMA C,7A 


20 FOR W-0 TO 1 STEF 1/24 

30 + )/(EXPCÌ>'t > ^ 

40 PRINT TnB<M>Ì"#” 

30 NEXT 
60 GOTO 60 


Maturainiente, un programma veramente efficiente dovrebbe offrire 
una presentazione migliore: titolo, disegno degli assi, coordinate, ecc. 
Avete tutte le conoscenze necessarie per farlo, e vi suggeriamo di 
esercì t a rvici. 


l,sercizio 


Tracciate due curve sullo stesso grafico, ad esempio 
sin(x) e cos(x) per x da 0 a 2u, 


Istruzione DEF F\ 


Può accadere di dover tracciare il grafico di una funzione che non è 
esattamente una delle funzioni della biblioteca, ma una combinazio¬ 
ne di diverse di esse. 

Questa combinazione può interv^enire più volte nel programma. In tal 
caso è noioso riscriverla ogni volta. 

Esiste una istruzione che permette di risolvere questo problema: si 
tratta di una istruzione che permette al l'utente dì definire le proprie 
funzioni, che vanno allora ad aggiungersi alle funzioni della 
biblioteca. 


Esempi: 

10 DEF FMHARM (X) = (A*X + B)/(C+X + D) 

20 DEF FNA(X) = L*sin(X) + cos(2 + X) 

30 DEF FNF{T) = EXP(—T12/2) 

40 DEF FNG(X)= l+20*(FN F(X)—MJN)/(MAX—MIN) 

Il nome delia funzione definita segue FN: obbedisce alle abituali re* 
gole applicabili ai nomi di variabili. 

Un richiamo della funzione FNHARM definita in 10 potrebbe essere 
100 Z = 1 + FNHARMP.S). 
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L'espressione tiata nella definizione viene quindi calcolata, sostituen¬ 
do rargomento formale con il valore (qui 3.5) fornito al momento del¬ 
la chiamata. Per le altre variabili che intervengono (qui A, B, C e D), è 
dei loro valori al momento della chiamata che viene tenuto conto. 
L'argomento può essere lui stesso fornito sotto forma di una qualsia¬ 
si espressione da calcolare: 

iOO PRmi FNA(y *A + EXPfBj/C) 

Gli esempi 30 e 40 qui sopra mostrano che è possibile usare, nella de¬ 
finizione di una Funzione, una funzione già definita. 

Usando questa nuova possibilità, ecco il programma C.7B che traccia 
il grafico della funzione dì Gauss tra A c B; 

PROGRAMMA C.7B 


5 INPUT "ESTREiir'iFÌ.B 
10 DEF FHFCK)-EWP<-x:t2/2? 

20 DÉF FN30<>*l+3e#^FNF00-l1lN?/<:HR;^-l*lIN> 
30 MFÌK*-lOT3e=11IH^10t3S 
40 FOR X-fl TO E STEP 
90 IF FKF<Mi>mx THEN FinX»FNF<y) 

60 IF FNF<:X)cri3 THEN MIN’-FNF^J^? 

70 NEXT K 

00 FOR X-H TO B STEP ^B-Fì>^22 
90 N“INT<FKI0^K>> 

100 PRINT TRBCN>;^'ii"'NE><T X 
110 GOTO 110 


Il vantaggio del programma C.7B rispetto alla versione precedente è 
che è generale: gli estremi vengono forniti da INPUT, e per cambiare 
funzione da tracciare, basta ribattere l'istruzìooe 10. 

Da 30 a 70 vengono effettuati i calcoli del massimo e del minimo del¬ 
la funzione, allo stesso modo che nelTesercìzio STO. 

In 60 abbiamo scritto MI anziché MIN; sappiamo che ciò rimanda al¬ 
la stessa variabile. Se avessimo scritto MIN, Basic avrebbe letto IF 
FNF(x) < M im HEN... ed avrebbe trovato la parola chiave INT in 
posizione errata. Ecco il tipo di piccole sorprese che sì possono 
avere! 

Abbiamo incontrato nei programmi della serie B che precedeva, una 
buona occasione di usare un DEF FN; cioè per stampare un risultato 
conservando soltanto due cifre decimali: la stessa espressione toma 
varie volte. 

Ad esempio, in B.S, avremmo potuto scrivere: 

3 DEF FNZ(X) = INT{X + 1{X))/100 
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Le linee 60 e 90 diventano rispettivamente: 

60 PRINT ‘ERRORE": FNZ[E)] GOTO 30 
90 FRI NT *VlNTO IN": FNZ(SC(J)); '^SECONDr 


Esercizio 7.2 


_ Riprendete iì programma detl‘esercizio 5.4. Nortrtal- 

mente^ i'avete salvato su cassetta. Avete una popoìaztone spartita fra 
IO classi. Tracciate iHstogramrna corrispondente. 


Un istogramma è un diagramma formato da laute sbarre quante clas¬ 
si, con le sbarre di lunghezza proporzionale al numero di clementi 
della classe corrispiondt'nte. Ad ogni lìnea, non sono N spazi che biso¬ 
gna stampare, ma N Rvs* ^ Sp^ 


Il problema della risoluzione 


Tutti i grafici che abbiamo ottenuto sono approssimativi. Infatti, si 
può procedere soltanto per numeri interi di caselle di stampa: la riso- 
lutìonc è 25 X 40. È stato possibile migliorare la risoluzione apparen¬ 
te nella carta dì Francia, scegliendo con cura tra i caratteri grafici 
usaiL Per contro, per il posizionamento delle città, siamo rimasti al 
limite dei 25 X 40, 

Per il tracciato di grafici, esiste un modo per approfittare di una mi¬ 
gliore risoluzione guadagnando un fattore di 2 in ogni direzione. Per 
questo, si devono utilizzare i caratteri grafici Q a D a e 
19 . Con ì loro inversi^ essi permettono dì ottenere un'intreccio di 
50x80 ossia 4000 punti per schermo. Vi suggeriamo di provare a 
tracciare grafici, per mezzo di questi caratteri, ma si tratta di un 
esercizio delicatol 

Ma il C64 possiede, in l'callà, il modo di fare dei grafici con la massi¬ 
ma risoluzione permessa dallo schermo di televisione: si guadagna 
un fattore di 8 in ogni direzione poiché la risoluzione diviene 
200 X 320. 

GRAFICA ALTA RISOLUZIONE 


Per fare della grafica alta risoluzione, dobbiamo capire come funzio¬ 
na il metodo di visualizzazione del C64. Si tratta di una questione de¬ 
licata che cercheremo dì semplificare al massimo. Possiamo conside¬ 
rare che lo schermo del C64 (la parte attiva, cioè che sta airìntemo 
del quadro) è formato da punti elementari, ognuno dei quali è suscet¬ 
tibile dì essere acceso o spento. Qui, ''spento" vuol dire Mei colore che 
è stato scelto per lo sfondo dello schermo (da POKE 53201)', 'acceso" 
vuol dire 'dì un colore determinalo dal contenuto della zona di me¬ 
moria 55196.-.". Questi punti formano una rete di 2.00 lìnee elementa- 
ri su 310 colonne elementari. Il televisore spazza l'immagine, linea 
elementare per linea elementare. Per ogni punto dell'immagine, al 



s 
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momertLo m cui la spazza, esso deve essere capace di sapere se è acce¬ 
so o spente. Il fatto di essere acceso o spento potendo codificarsi in 
un bit (1= acceso, 0 = spento), ciò rappresenta un'informazione di 
200 X 320 = 64000 bits = 8000 bytes o 8K. Il tempo necessario per 
riempire questi 3K bytes, per formare un'immagine, è lungo. Quindi, 
per i messaggi correnti, bisogna semplificare, 

A questo scopo, sì raggruppano ì punti elementari in rettangoli di S 
linee elementari per S colonne elementari chiamati "'maglie'. Un ca^ 
rattere viene a stamparsi sullo schermo in una maglia. maglie so¬ 
no suddivise in linee e colonne. Bisogna distìnguere bene queste lìnee 
e colonne che chiameremo ‘"macroscopiche' dalle linee e colonne eie* 
mentari. Si vede che lo schermo è formato da 25 lìnee per 40 colonne 
(macroscopiche). 

Dato un punto di coordinate elementari ?( e y (assi come nella figura 
qui eli fronte origine di numerazione 0), le sue macrocoordinate sono: 

XM = INT(X/8) e YM = INT(Y/8) 



Così il punto messo in rilievo nella figura ha per coordinate elemen¬ 
tari X-IS; Y=ll, Appartiene alla maglia di coodinate XM = 2: 
YM = i. Rispetto alla maglia, sta sulla linea elementare L = 3 (resto 
della divisione di Y per S), colonna elementare K = 2 (resto della divi¬ 
sione di X per 8). 

Ora notiamo che i caratteri che si possono stampare in una ntaglla 
appartengono ad un gruppo ristretto: mentre cì sono 2^ combinazio¬ 
ni possibili (ei sono 64 punti in ogni maglia, che possono essere acce¬ 
si o spenti), in realtà si visualizzano soltanto 256 caratteri possibili 
(Ivi compresi i grafici e i contrasti invertiti). Codificheremo quindi 
l'informazione in due tappe. 

In una prima memoria (obbligatoriamente viva), dal numero di bytes 
uguale ai numero dì maghe sullo schermo (dunque 1000 per il C64), 
metteremo il codice del carattere che deve figurare in ogni maglia. 
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La E è l^irìdirizzo di origine di questa mentoria (1024), rindirizzo cor- 
rispondcnie alla maglia di coordinate XM, YM è: 
Q = E + 40 * YM + XM (la formula è leggermente diversa da quella di 
pagina 71 perché, in questo caso, numeriamo da 0 in poi). 
Nell'esempio qui sopra, avremmo: Q = 1024 + 24 — 1040. Se ìn quella 
maglia, sì vuole visualizzare A, vi si metterà il codice di A (cioè 1, se* 
condo la tab, 6,2). 

Abbiamo poi una seconda memoria (che può essere memoria morta) 
che conterrà la corrispondenza codice-disegno. Questa memoria si 
chiama il generatore di caratteri, e la sua ampiezza è di 256 x S = 2K 
bytes. 

Chiamiamo G la sua origine {53243 sul C64 all accensione). Ci sono, m 
questa memoria, 6 bytes per ogni carattere. All'iitdirizzo 
G + 8 * R + L, si trova un byte che è Timmagine della linea elementare 
L che cl vuole per disegnare il carattere di codice schermo R, 
Provate il programma: 

5 P0K€5fi334,P££K<56334>flND2'54 

6 P0KE1jPEEKC1>HND251 

10 -REn CODICE DX 

20 POR L-0 TO 7 
30 fl<L>*PEEK^G+S#R+L>'HEXT 
33 P0KE1/PEEK<1>0R4 
36 POKE36334,PEEKC3e334>ORl 
40 POR L^0 TO 7 
S0 PRÌNTfìCL5:NEMT 

Ottenete le stampe: 


24 

±± 

00011000 CM* 

1- 

- 

# 

« 

w 

SO 


00111100 
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Si vede come ciò fa disegnare una A. 

Il C64 offre due modi di fare alta risoluzione. 

Si può, con un POKE, in un registro della cassetta VIC, dire che il ge¬ 
neratore di caratteri è situato in RAM. Si possono quindi definire le 
forme che sì vogliono. In pratica, applicheremo ciò alla creazione di 
altri gruppi di caratteri. 

Questo permette, ad esempio, le lettere greche, certi segni matemati- 
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ci, i caratteri grassetti o itaiici per un mim iratiamento dì testi, oppu¬ 
re permette di aggiungere altri caratteri grafici a quelli che vengono 
fomiti per creare insetti, invasori o altri,,. 

— Si può sempre, con POKE, far visualizzare in modo alta risoluzio 
ne nei quale si definiscono, bit per bit, i punti accesi o spenti, Ow^ia- 
mente, Facendoloj, sì rinuncia alla semplificazione citata prima e di‘ 
ventano necessari 8000 bytes di memoria (cosa che non dà fastidio in 
un C64). 

Modifica del generatore di caratteri 

Come esempio di modifica del generatore di caratteri, creeremo la 
lettera greca a invece del carattere Lo stesso metodo varrebbe per 
ogni altro carattere e servirebbe, ad esempio, per creare la à, la è, 
ecc. 

Si devono fare quattro cose: 

— scegliere la zona di RAM dove andrà il generatore e proteggere ta^ 
le zona da Basica 

— copiare il generatore di carattere ROM nella zona RAM^ tranne se 
si cambiano tutti i caratteri^ 

— creare, in RAM, i nuovi caratteri desiderati: 

— dire al C64 che, ora, il generatore di caratteri sta alTindirizzo RAM 
che era stato scelto. 

Per tornare alla situazione di partenza, quando abbiamo finito di usa¬ 
re i nuovi caratteri, basta fare STOP/RESTORE. 

Vediamo, ora, le tappe una per una: 

— L'indirizzo di inizio del generatore di caratteri RAM, il più facile 
da adottare, è 122S8 (3000 in esadecimale). 

Per proteggere tale zona, bisogna dire al Basic che la sua memoria si 
ferma lì, con POKE 52,48: POKE 56,48: CLR, 

Ovviamente, ciò riduce parecchio la memoria lasciata a Basic (IIK 
invece di 39), ma: 

• basta per parecchie applicazioni e, in ogni caso^ per quelle di que¬ 
sto libro; 

• esistono altre possibilità che verranno spiegate nel prossimo libro 
di questa serie. 

— Sì usa una tecnica analoga a quella della pagina precedente: 

5 POKE 56334, PEEK (S6334) AND 254 

6 POKE 1. PEEK(I) AND 251 
IO Gl = 5324S:G2- 12288 

20 POR I = 0 TO 2047 

30 POKE G2-I-I, PEEK(Gì+I)tNEXT 

35 POKE 1, PEEK(l) OH 4 

36 POKE 56334, PEEK(5ó334) OR 1 

Si puù anche copiare soltanto una parte del generatore dì caratteri 
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cambiando i limiti del ciclo in 20 (infatti, la copiatura completa è 
lunga). 

— Si procede in binario in una griglia S X 8, come abbiamo visto per 
A. Se R è il codice del carattere da modificare (qui 0): 
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e quindi: 

40 DATA 0, 0, 59, 126. 108. 108, 136. 59 
45 R = 0 

50 POR L = 0 TQ 7:READ AtPOKE G2 + 8*R + U AiNEXT 


— Si attiva il generatore di caratteri In 3000 csa con 
POKE 53272, (PEEK{53372)AND240)+12 
(impone 1100 nei bìts 0 a 3 del registro d'indirizzo S3273) 


l-.sei ei/-iiì 7.3 


quello che precede e fate stampare : <x = ALFA, 


Tracciato di grafici in alta risoluzione 


Quando il C64 viene messo in modo alta risoluzione, titilìzza la me¬ 
moria in maniera diversa dal modo carattere. La memoria di colore 
(5S296,,r) non viene utilizzata, il colore verrà codificato in 1024 e se^ 
guenti (la vecchia memoria dì schermo). 

Ogni byte specifica due colorii bìts 0-3t colore dello sfondo (punti 
'spenti^; bits 4-7: colore del grafico (punti "accesi'). 

Ciò permette di specificare i colori in ogni "maglia" dello schermo 
ma, in pratica^ specificheremo gli stessi dappertutto. 

Ad esempio, POR I = 1024 TO 3023: POKE 1. L NEXT specificherà un 
grafico nero su sfondo bianco, 

CU 8000 bytes che specificano I punti accesi o spenti devono essere 
presi in un^altra zona memoria dì origine E. 1 bytes dì quella memo¬ 
ria sono numerati da E + 0 ad E + 0000. secondo lo schema qui dì se¬ 
guito che li suddivide in maglie caratteri. 
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I 

bit 7 6 5 4 3 2 1 0 


byte oQn 

1 

2 

3 

4 

5 

6 
7 

320 

321 


I [ I 1 8 16 

9 

10 

11 

12 

13 

14 

15 

32S336 


24. 312 

313 

314 

315 

316 

317 

318 

319 
632 


327 335 639 

640 

7680 7992 


76B7 7999 

Secondo questo schema date le coordinate di un punto eleinemare X, 
Y, si determina in quale maglia elementare XM, YM esso sta con: 

XM = lNT(X/8) c YM-lNT(y/Sl 

0£X^319 0£Y^199 0:SXM£40 0 :S YM == 25 

11 punlo sta, nella propria maglia, sulla linea elementare L= YAND7 
(altra formula più lunga da calcolare L = Y—8*YM) ne segue indi¬ 
rizzo dei byte in questione: 0 — E + 8 +(40* YM + XM) + L, In questo 
byte, il punto sta nella colonna elementare: K = X AND 7(o 
X—8*XM). 

n numero del bit corrispondente è 7—K, come mostra lo schema: 

K 01234567 

II I I I I 

11° bit 7 6 5 4 3 2 1 0 

Quindi, per accendere un punto, bisogna fare: 

POKE Q, PEEK(O) OR 2T(7-K) 

e per spegnere lo stesso punto, bisogna fare: 

POKE Q, PEEK(Q) AND (2S5'2t(7-K)) 
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Cosa cì manca per un tracciato effettivo? 

— Scegliere l'origine della memoria di stampa e specificarla al C64. 
Per questo libro^ la scelta migliore È E —S192 (esadecimale 2000), 

La si specifica con: 

POKE 53272. PEEK(53272) OR 8 

Fatto questo^ dobbiamo dire al C64 che non crei variabili Basic sopra 
8192. Lo sì fa con le istruzioni POKE 56. 32: POKE 52, 32: CLR. In SS, 
56 e 51, 52, si trovano dei puntatori che contengono rìndirizzo più al¬ 
to accessibile da Basic, Li trasformiamo affinché Basic "creda* che la 
sua memoria si ferma in 2000 esa f32 dee = 20 esa). Il CLR azzera tut¬ 
te le variabili: lo si deve fare quando SÌ sono appena trasformali i 
puntatori. 

Ciò implica le stesse note che a pagina lOL La zona di memoria, la¬ 
sciata a Basic, è molto ristretta. Altri indirizzi, che lasciano più po¬ 
sto, sono possibili: verranno descritti nel prossimo libro di questa 
serie. 

— Riempire la memoria di colore HR, ad esempio con degli 1 (figura 
nera su sfondo bianco). 

Riempire la memoria di stampa con degli 0; fintantoché non abbia- 
mo tracciato nulla, ci vuole lo schermo vuoto e non lo si può fare con 
?*clr" che agisce soltanto in modo caratteri. 

— Mettere il C64 in modo HR con POKE 53265, PEEK(53265) OR 32 

(sì ritorna in modo normale con POKE 53265, PEEK(532Ó5) AND 223). 
Per accendere 11 punto dì coordinate X. Y, basta quindi richiamare i 
sottoprogrammi 900 che calcola le coordinate di maglia: / 

900 XM = INT(X/&): YM = 1KT(Y% P = E-h 320* YM + 8 • 
YM: RETURN 

e 1000 che accende il punto: 

1000 K = X AND 7: L= Y AND 7: Q=P-hL 
1010 POKE Q, PEEK(O) OR 2t{7-K): RETURN 

Siamo pronti, ormai, a tracciare una sinusoide. X varia da 0 a 319, Y 
da 0 a 199, quindi prenderemo la formula: Y = 100 + 

90*SIN(8*T*X/31&) affinché la figura abbia 4 alternanze. 

PROGRAMMA D.l 

10 P0KE133£7S,PEEK<53E72> OR 9 

2e P0KeS£.3£:P0KE5e.32:CLR 

3e E’=Sl9a=CO“1024 

40 FOR I-CO TO CCi+&99:P0KE 

30 FOR I-E TO E+7999:P0KEI^e=HEXT 

60 P0KE33265,P£EIC^33£65> OR 33 
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70 DEF FNF<MJ»100+9G*SIMtS*fr!lfX/3ia> 

80 FOft H-0 TO 318 
50 V-FHPCX? 

100 8OSUB980 ‘ QOSUB1000 : hlEXT 
lltì OOTOU0 

500 Xn» IHT CX/3 > : VM» I NT < V/8> ^ P™ÉL+32e* VEI+Sit'X^t ■ RETUFH 

1000 K-X flNrf7'L"V RND 7:Q*P+L 

1010 POKE C!.PEEK<Q> OR 2 t<;7-K> : RETURN 


Fare un sottoprogramma 2000 che^ anziché accendere 
il punto di coordinale X, Y, spenga quel punto. 


1" se rei/io 7+4 


llsL'ixì/io 7.5 


_ Siamo ormai in grado di trasformare il nostro €64 in 

teleschermo. In funzione de! tasto premuto spostiamo il punto di irac- 
ciatOr Se il tasto CTRL non è premuto, avviene un semplice sposta¬ 
mento. Se il tasto CTRL è premuto simultaneamente, si scrive. L'iridi- 
rizzo memoria 2 o 3 contiene in ogni momento Timmagine del tasto 
attualmente premuto. Vi proponiamo i seguenti assegnamenti: 


Tastò PEIÌK(2Q3) Movimento Tasto PEEKfZOl) Movimento 


CRSR I 
CRSR ^ 
CLR/HOME 
INST/DEL 


7 i 

2 

51 t 

0 *“ 


FI 4 

F3 5 

F5 6 

F7 3 




Se nessun tasto è premuto PEEK(203) = 64 . . ■ 

L'indirizzo memoria 653 contiene in ogni momento io stato dei tasti 
SHIFT, C= e CTRL secondo ia tabella: 


Tasto 

PEE(s;(653} 

NULLA 

0 

SHIFT 

t 

C“ 

2 

CTRL 

4 


Vediamo che nessun movimento necessita un SHIFT. Vogliamo com 
servare il fatto che SHlFT CLEAR/HOME svuoti lo schermo. E 
C= HOME che riporta lo spot aU'orìgine, poiché HOME da solo fa 


Esoi ei/io 7+6 


Torniamo al iràcciaio di figure (programma IPI). Non 
si potrebbero avere insieme la figura e dei caratteri (per dei titoli o le 


coordinale}? 


Eccol Non d rimane da dare che un po' di movimento. 
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Nozioni sui disegni anlmaU 


Ci limiteremo qui alle prime nozioni che permettono di anìTnare ciò 
che il C64 visualizza. 

Il primo metodo che viene in mente è il mciodo classico utilizzato al 
cinema. La scena viene scomposta in un grande numero dì disegni 
che vengono proiettati in successione. 

Con il C64, che pure è uno dei microcomputer più veloci, si pone il 
problema del tempo di riempimento dello schermo per ottenere una 
immagine. Tanto più che, per non avere troppi scintilMì, bisogna vi¬ 
sualizzare almeno 15 immagini/secondo. Questo necessita il ricorso 
al linguaggio macchina che è studiato in un'altra opera di questa 
collana. 

Per poter usare il BasiCj bisogna passare da un'immagine alla succes¬ 
siva cambiando soltanto una parte molto piccola dell ■immagine. Si 
possono usare, a scelta, dei PRIHT o, meglio (più rapido), dei POKE 
nella memoria. È proprio quello che è stato realizzato nel pmgram^ 
ma del cucù (programma C4, esercizio 6.9) che costituisce un embrio¬ 
ne di disegno animato. 


Movimenti dì una palla 


Come esempio, senza importanti modifiche da un’mimagìne alla se¬ 
guente, faremo spostare una pallina sullo schermo/'Ciò porterà ad un 
embrione dì gioco di tennis. 

Per spostare la palla da sinistra verso destra, bisogna: 

— Stampare la pallina ( SHIFT Q) 

lOPRiNT'#'. 

Siamo ora pronti a stampare sulla destra della pallina. 

— Ritornare sulla pallina e sostituirla con un bianco, poi stampare 
una nuova pallina 

20 PRlNT'SSp 

— Ciciare suiristruzione 20i 30 GOTO 20. 

Provate il programma formato dalle tre istruzioni, 10, 20, 30 qui 
sopra. 

Ci sono vari difetti: 

— bisognerebbe svuotare lo schermo e piazzarsi sulla linea centrale 

( 12 ); 

— la palla ha percorso tutto lo schermo da sinistra verso destra, ri¬ 
parte verso sinistra sulla linea successiva; 

— non c'è regolazione di velocità. 
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La prinìa obiezione viene facilmente molta con S PRINT "Clr' b...h’ 
Per la terza, bisogna introdurre un intervallo prima di fare il GOTO 
in 30, ad esempio con l'aiuto del sottoprogramma seguente: 

1000 T = TI 

30 G05UB lOOO: GOTO 20 lOlC IF TI-T < D GOTO 1010 

1020 RETURN 

D serve per regolare l'intervallo nella velocità di spostamento. 

Per la seconda obiezione, si può decidere il movimento seguente: an* 
dare da sinistra verso destra, poi, quando la pallina arriva aU'estre- 
mità della linea, andare da destra verso sinistra, ecc. 

Per questo, dobbiamo utilizzare una variabile K. che tiene il numero 
della colonna nella quale si trova la pallina. Il senso viene invertito 
quando K. = 40 o L 

Pei-ché la pallina si sposti verso sinistra, si deve scrivere: 

40 PRINT ss •";K = K—1 
Ne consegue il programma D,3. 


20 PRINT 'ilf'j K-K+1 
30 GOSUB 1000= IF k;^ 40 GOTO20 
4G PRINT "Il li»"; =K-K~Ì 
50 eOSUB 1000;IF K>1 DOTO 40 
60 GOTO 20 

303 GOSUB 1000=IF KC40 GOTC20 
1000 T-Tl 

1010 IF Tl-TCD OOTO1010 
1020 RETURN 


Con D = 5, realizzate un vero ipnotizzatore. Con d < 3, la pallina va 
abbastanza veloce perché si creda di vedere una scia. Con D > 9, gli 
scatti del movimento sono visibili. 


ILserci/.io 7.7 

jFtìr osciiare il valore di pausa tra / e IO, (La pausa va- 

rida di I ad ogni andata ^ ritorno). 

Esercìzio 7.8 

, Far oscillare ia patlina dall'alto in basso dello 

,schermo. 


[ Hsei ei/iu 7.9 

Fare andare dalla pallina in diagonale (dall'angolo si- 


fii^tro aìriihima linea posizione 25 e ritorno). 
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Tennis 

Siamo pronti per giocare a ttìimis. In realtà, il nostro gioco sarà rudi- 
ni^entale. Partiamo dalia pallina che oscilla da sinistra verso destra, 
disponiamo un giocatore a destra e un giocatore a sinistra. Il giocato^ 
re di destra non deve lasciare passare dalla pallina la posizione 31 
sullo schermo. Per mostrare che recupera la pallina deve premere un 
tasto. Adotteremo il tastoA Perii gi(x:atore di sinistra saranno la posi¬ 
zione 10 c il tasto Z, fi programma riconoscerà il tasto mediante un 
GET. 

Peraltro, imponiamo ai giocatori dì non premere troppo presto sul lo¬ 
ro tasto: se il giocatore di destra preme / prima che ìa pallina sia in 
colonna 28, o se il giocatore dì sinistra preme Z prima che sia in co¬ 
lonna 13, concede un punto al suo avversario. 

Ad ogni punto, viene mostrato il punteggio. Il servizio verrà effettua¬ 
to premendo ' Shift ' e useremo una nuova islruitione: l'istrtizione 
WAIT. 

Nella sua forma WAITA, B il C64 legge il contenuto dell'indirizzo me¬ 
moria A, e fa PAND logico con il valore B (compreso tra 0 e 255). 

Se il risultato è 0, il test viene rifatto, il che produce un'attesa. Se il 
risultato è 1, il C64 passa alPistruzione seguente. Ora. premendo il ta¬ 
sto *Shift\ la locazione di memoria d’mdìrizzj? 653 prende il valore 1. 
mentre contiene 0 nel caso opposto. Dunque aspettare una pressione 
del tasto si scrive WAIT 653,1. Al momento del servizio, la pal¬ 

lina parte dal centro dello schermo. Il senso del movimento viene 
tratto a sorte. 

Ne consegue il programma D.4. Il listìng qui sotto è l'adattamento di 
un programma di La Commode n.L II sottoprogramma vuoto in 300 è 
previsto per essere sostituito da una routine che produca il rumore 
del rimbalzo della pallina. Dovreste scrìverlo facilmente con Paiuto 
della fine del capìtolo 6, 


2 OIOCATORE DI SINISTRA 

GIOCA CON IL TRSTO SE»' 

3 FRINÌ'MIL GIOCATORE DI DESTRA GIOCA CON IL TASTO 

4 PRINT^MIL SERVI20 SI FA CON SHIFT" 

5 PRIHT“3<PRiriA PREMETE QUANDO LA PALLINA k ARRIVATA 

NEL VOSTRO CAMPO'' 

€ PRINT“P1U "FORTE" VIENE RIMANDATA LA PALLINA" 

7 PRINT"?(nA SE PREMETE TROPPO PRESTO. CIÒ DA UN PUNTO 

AL VOSTRO AVVERSARIOl" 

3 RR1NT"1PER smettere fare STOP CON LA PALLINA VISIBILE 

<SHIFT SE NECESSARI0>" 

? PRINT"J(MFARE 3HIFT PER INIZI ARE” : NAIT652.1 
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10 SG-»0:SD^0^e**"«” ■S*-"'—" ^ 

20 PRINT -nHOMI" i C*; SOJ Ff 1 PRIHTSPC<33>i "H" ; D* JSD; 


23 I FS□>SJ3THEHPR l NT . S* 

26 IFSD>SGTNENPRIKTTAB<33?;S* 

30 pRim^'imomìam" ; = oosuB200 = QOSI 1 B 200 


PRINT'^M"; ^GOSUB200 

s GOSUB200 ' PRlNT^'mT r 


33 NPITS^an 

40 K-ZP^PRINTTfiBCK-n; '’i'S :P0KE 138^0 
50 IFRND<1»,5OOTO130 
60 TT*TI 

70 GETR#=lFfi*-"Z"OOTO110 
ac IP CTI-TTXTOGOTQ?© 

30 PRINT-il IHI •"! SK*K-Ì : IFK>-10GOTO60 

100 SB^SD+1Of-F* 001020 

110 IFK>»13COTO100 

120 TD-Z*<13-K> = QO3UB30 

130 TT-TI 

140 GETft» 51 FHf- ’V " GOTO 180 
150 IF CTE-TTJCTDGOTO140 
160 PRINT^'II •"! :K-K+1 : IFK<-31QOTO130 
170 SO-SC+1" :D*"F*'OOT02@ 

100 lFK<*2eGOTO170 

190 TG-Z*CK-29>^OOSUB3&0'GOTO60 

200 PRIHTTPB(:3>;“I 1 ; T0B<275 ; " I !'■ RETURN 

300 RETURN 


Gli "SPRITES” o OGS 

[1 C64_e, in questo, è unico sul mercato — fornisce un altro int^o 

abbastanza semplice per creare disegni animati. Sono gli 'spritcs" o 
Oggetti Grafici Spostabili (il tèrmine inglese "sprite" significa spinto 
o fantasma* Il termine OGS è più tecnico, ma meno spaventoso), 
n C64 può gestire 3 OGS sìmultaneamentep e ciò, indipendentemente 
da lutto il resto di ciò che è visuali:j 2 ato. Gli OGS sono numerati da 0 
a 7. Bisogna notare che, se un OGS appare sullo schermo, nello stesso 
posto di un altro oggetto visualizzato (ad esempio un carattere), esso 
ha la precedenza, cioè nasconde queirahix) oggetto. Allo stesso modo, 
se due OGS si scontrano sullo schermo, quello di numero più piccolo 
ha la precedenza, quindi nasconde Taltro. D'altra parte, uno scontro 
sullo schermo, tra un OGS e un altro oggetto o un altro OGS. si chia¬ 
ma una collisione: viene individuala dal sistema ed è molto utile per 
la programmazione di giochi. Non ne parleremo oltre m questo libro. 
Gli OGS sono definiti da locazioni di memoria, da registri della cas¬ 
setta Vie che sono propri di ogni OGS, o da registri condivisi tra gh 
OGS. Quando un registro è condiviso, il bit n° 1 riguarda I OGS n I, 
Un OGS è definito da: 
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— La sua forma. Questa sì definisce allo stesso modo che un caratte- 


re programmabile, ma 

in 

una matrice dì 21 

linee, 24 colonne. 

disposte: 






123456789 

10 11 12 13 14 15 16 17 18 19 2021 22 23 24 


765432J07 

6 5 4 3 2 10 7 

6 S 4 3 2 1 0 

linea 1 

byte 0 

1 

byte 1 1 

byte 2 

lìnea 2 

byte .3 

1 

byte 4 1 

byte 5 

linea 3 

byte 0 


j ^ ^ 1 

’i j 

linea 21 

byte 60 

1 

byte 61 1 

byte 62 


C1 vogliono quindi 63 bylcs per definire ogni OGS. In realtà, viene 
concesso un 64“ byte di riempimento dato che 64 è una poten^^a di 2. 
Ciò semplifica ^indirizzamento (nel seguito, si numereranno le linee 
da 0 a 20 e le colonne <ia 0 a 23). 

Gii indirizzi sono definiti in modo indiretto mediante puntatori ìn 
2040 fino a 2047 (dietro la memoria dì schermo). 

Il puntatore d'indirizzo 2040 + 1 riguarda TOGS n“ I (I da 0 a 7) 
L’indirizzo del byte 0 dell’OGS n° I è 64 + PEEK:(2040 + I). 

L’indirizzo del byte K dellTCS n° 1 è 64 +PEEK{2040+I) +K. Vi si 
mette il motivo binario che definisce la zona corrispondente 
dell'OGS. 

Si noti che questa definizione indiretta delLindirizzo permette di de¬ 
finire più OGS della stessa forma: basta che più puntatori siano 
uguali; punteranno allo stesso indirizzo di memoria e quindi defini¬ 
ranno la Stessa forma. Ciò permette pure di tenere in riscrv'a più Por* 
me per lo stesso OGS: si passa velocemente da una forma all’altra 
con un solo POKE nel puntatore. 

— Lfl sua attivazione. L'OCS n“ E viene attivato (appare) se il bit I del 
byte d'indirizzo 53269 vale L Sparisce se tale bit vale 0. 

Esempio: fare apparire l'OGS 1: 

POKE 53269, PEEK(53269) OR 2fl 

// suo modo muiticoìore. Non trattato in questo libro: qui, ci limi¬ 
tiamo a degli OGS monocromi. 

— // suo coiore. Per definire il colore dell'OGS n° I, si far POKE 
53287 +C codice colore. 

— La sua diìaiùzhne* Si dilata, in orizzontale, l'OGS n“ 1 con: POKE 
53277. PEEK(53277) OR 2T1 lo si dilata, in verticale, con: POKE 
53271, PEEK(53271) OR 2fl. 

— La sua posizione sullo schermo. È la posizione dell'angolo superio¬ 
re sinistro quella che viene definita con X compreso tra 0 e 347, e Y 
compreso tra 0 c 255. Da notare che l'OGS è visibile sullo schermo 
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soltanto per X compreso tra 50 e 229. Fuori da questo intervaJlo, 
FOGS (sparisce nei bordi o anche fuori dello schermo (vedi la figui a 
qui sotto)» 


¥ 


—■X=0,y=0 (inwisitKe) 



P^.=2-I.Y=50 ^ 

X=321,Y=50 

X-32l,Y=229 

X=24.Y=229 






'■K=t0,V=250 (InvisltHie) 



X = 347^¥m 0 (Iftwifiibilep 
Zona di detlnlzk»n« 


Zona vq^le 



Zpna (ji 21 X 2 4 


Ora specificare Y è facile. Si fa: 

POKE 53249+2 *1, Y (I = numero dell’OGS) 

Per X, è più difficile perché X non sta in un byte. Se X > 255, c'è un 
9* bit di valore 1. Per il byte basso di X, c^è un registro per ogni OGSj 

POKE 53243 + 2*1, X AND 255 

I 9“ bits delle X degli 8 OGS sono, in quanto a loro* raggruppati nel 
registro 53264: 

POKE 53264, (PEEK(53264) AND (255—2n} OR (—2tI)*(X > 255). 

Questa espressione ha Paria complicata, ma non fa altro che sfrutta^ 
re U fatto che una espressione logica viene valutata, come 0 se è falsa, 
e —1 se è vera. 

Siamo praticamente pronti a far evoluire degli OGS sullo schermo. Ci 
manca di sapere in quali indirizzi di memoria definiremo i nostri 
OGS, quindi che valori metteremo in 2040 fino a 2047. 

Ci sono due scelte consigliate: 

— Se avete soltanto 3 OGS al massimo, potete fare: 

POKE 2040.13 {indirizzi dell'OGS 0: 832-895) 

POKE 2041,14 (ìndi rizzi dell C3 ^jS 1. 896“859) 

POKE 2042,15 (indirizzi delPOGS 2; 960-1023) 

il che equivale a piazzare gli OGS nel tampone cassetta, dunque vale 
mentre non utilizzate la cassetta, 

— Si possono mettere i dati in L2233 e seguenti, cosa che viene fatta 
con : POKE 2040+h J92 + I 

f 
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Non dimenticare dì proteggere dal Basic la zona 122BS^- con: 

POKE 52,48: POKE 56,48: CLR 

Il programma seguente è un "editor dì OGS’. Vi permette di definire 
visualmente i vostri CK}S, in una griglia dì punti sullo schermo: i . sa¬ 
ranno dei vuoti, mentre ie X rappresenteranno gli elementi accesi 
dell'OGS, Per accendere una X in una posizione, ci andate con movi^ 
menti del cursore sulla linea. Terminate la linea con RETURN, 

PROGRAMMA D,S 

EDITOR DI OGS 

60010 PQKE :52j 4B ‘ P(5KE56. 4B - CLR 

60020 TW 1*0 TO 7:P0KE 2040+1.192+1 NEXT 

60030 INPUT ":iìQ DELL^OGS OR DEFINÌ l>7 THEN END 

60040 R-64#PEEK<2040+r> 

60050 FOR M“R TO fl*63 POKE 
60060 FOR L*Q TO 20 

€0070 PRINT"? Hi, ^NEf^T 

600SO PRINT V,! T J XI a IITOJ7 W 1^0" ^ 

60090 FOR L*^0 TO 20'INPUT fi# 

60Ì00 FOR K"^0 TO 23 

€0110 J=INT(;K78> ■ B^K fìND 7 

60120 &#>pmid#cr#.k+i. n■M ì^R+3#L+J:FEEK<;m> 

60130 :F THEN POKE N.C OR 2t<7-3> 

60140 HE^ìT^NEHT 

60150 PRINT'T'-POKE 53237+1.0 POKE 53269jPEEK<53269> OR 2tl 
60160 POKE 53249*2#I.100-POKE 53248+2#I.180■P0KE53264f0 
60170 FOR T-1 TO 5000 NE^iT 
60160 POKE 53269. PeEK<5€243> PlND ^255-2Tl> 

60290 GOTO 60030 


Il programma termina con la visualizzazione dell'OGS che è appena 
stato creato durante 5 s, poi riprende la creazione dì un nuovo OGS 
(lo fermate dicendo che ìL numero dell'OGS da creare è ^ fi; potete ri¬ 
cominciare la creazione dello stesso OGS se non siete soddisfatti^ ri¬ 
dando lo stesso numero, 

11 programma sta nelle linee di numero 60010 e seguenti. Per poter 
essere incorporato alla fine dei vostro programma dì uso, prima fate 
RUM ÓOOIO per creare i vostri OGS, pi>i RUN per usarli. 


Esereì/io 7J0 


__ Create un OGS. Fatelo spostare da sinistra verso de¬ 
stra, poi da destra verso sinistra, stillo schermo. 


[jjjff ffHBWMl Create un OGS. Fatene apparire tre versioni m tre po¬ 
sti diversi dello schermo e m tre colori diversi. 
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RICAPITOLAZIONE 

ÀhbiartK? avuto, ormai, un'idea della gra?^ parte delle tecniche di pro- 
gramrnadone accessibili al C64, tanto nel campo dei calcoli quanto in 
quello dei giochi e dei irattamenti grafici- 

Per quanto riguarda t disegni animatij abbiamo visto che il Basic è un 
po' lento per alcune applicazioni^ sebbene gli OGS diano interessami 
possibilità. 

In tal caso^ c'è una risorsa che consiste nel linguaggio macchina del 
microprocessore del C64. 

Le tecniche corrispondenti verranno affrontate in un'altra opera di 
questa collanCr 






Capitolo O 

Il C64 e il mondo esterno 


Prima di affrontare ia conclusione di questo libro, desideriamo darvi 
un breve resoconto delle caratteristiche del C64 che moltiplicano le 
già numerose possibilità viste finora. Si tratta delle interfacce del 
VJC con il mondo esterno. 

Infatti nei capitoli che precedono^ abbiamo visto le pussibiUtà inter¬ 
ne del C64 h Ma il CM può. inoltre, agire sul mondo esterno e venire 
influenzato da esstj, il che crea molteplici applicazioni. 

Qui vedremo soltanto brevi nozioni sulle interfacce dei C64; infatti 
esse vanno al dì là del tema dì questo libro, e verramiù trattate in un 
prossimo volume di questa serie. 

Le interfacce del C64 


La figura qui sotto è una veduta da vicino del C64 che mostra i sette 
conuetlori mediante i quali esso comunica con il mondo esterno. 


F 

IbniiofumefiigJarfesio 

G 

G' 



A è il connettore ‘parte interna'*. Trasmette un certo numero di se¬ 
gnali interni, ma soprattutto un porlo di S bits paralleli a disposizio¬ 
ne dell'utente. È quello che useremo nella sezione seguente. Si deve 
notare che questi segnali possono anche essere utilizzati per trasfor¬ 
mare il vostro C64 in terminale^questo viene chiamato rintcrfaccia 
RS 232 e I programmi di gestione sono incorporati nelle memorie 
morte del C64. 

B è il connettore per il magnetofono a cassette. 
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C è li connettore di quello che viene chiamato rinierfaccìa IEEE serie 
che permette di collegare la stampa e Tunità dischi del C64. Un'esten¬ 
sione presto disponibile permette di trasformare questa interfaccia 
in ìEEE 4SS parallela. Questa interfaccia (parallela) corrisponde ad 
una norma molto diffusa. Essa permette di col legare le periferiche 
del resto della gamma Commodore e centinaia di apparecchi di stru¬ 
mentazione (voltmetri, frcquenziometrb spettrografi. eccO o altre pe* 
riferìchc (esempio: tracciatori di grafici) — (si inserisce nel connetto- 
re P-ji, 

D e D' sono i connettori video che col legano il Có4 ad un televisore. 
Ricordiamo che potete collegare D" alla presa di antenna del televiso¬ 
re, per il tramite del ''modulalore" incorporato nel C64, Ma, a nostro 
parere, la qualità deirimmagine è migliore se collegate D direttamen¬ 
te alla presa PERITEL del vostro televisore {a condÌ 2 Ìone che esso ne 
sia equipaggiato). 

E è il 'connettore di estensione di memoria". Esso trasporta i segnali 
del microprocessore del C64. A lui vengono collegate le estensioni di 
memoria: 

— interfacce o estensioni d'entrata'uscita; 

— memorie morte che formano scatole di giochi o che portano fun¬ 
zioni utilitarie (quelle disponibili più velocemente saranno un istrut¬ 
tore làngoaggio-maccbina e delle estensioni del Basic nel campo dei 
grafici e del colore). 

F è il connettore di alimentazione al quale collcgate il trasformatore, 
collegato lui stesso alla presa di settore. 

G e G' sono i connettori di giochi ai quali potete collegare manopole 
dì giochi, potenzionìetri, una matita luminosa, ecc. 

Accensione di una lampadina 

Come esempio rudimentale del modo in cui il C64 può agire sul mon¬ 
do esterno, descriveremo come può comandare Taccensione o lo spe¬ 
gnimento di una lampadina. 

Siccome — ricordate — il Có4 conosce l'ora grazie al suo orologio 
tempo reale, è possibile chiedere raccensione o l'estinzione ad ore 
stabilite. 

Ciò permette applicazioni come lo spegnimento di tutti gli uffici dopo 
le 18. 

Risponderete che un programmatore a contatti ha lo stesso effetto; 
non È del tutto vero: il C64 può tenere conto dei giorni lavorativi, del¬ 
le feste mobìli e pure degli anni bisestili. Una tale applicazione am¬ 
mortizza il prezzo del C64 in 4 mesi, tanto più che si possono nello 
stesso tempo gestire altri risparmi di energia. 

La base di questa applicazione è il PIA. Studiamolo ora in modo 
succinto. 
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Nozione di PIA 


(Peripheral Interface Adaptor = adattatore di interfaccia periferica). 
Il PIA è un circuito integrato annesso del microprocessore. 

Un PIA contiene generalmente due "porti'. 

Un porto di PIA è visto dal microproces^sore come una locazione di 
memoria di 8 bit, che ha un indirizzo nel quale si può fare PEEK o 
POKE. Nel nostro caso, questo indirizzo è 56577. 

Ma questa “"locazione di memoria" ha un comportamento particolare: 
ognuno dei suoi 8 bit è collegato ad una presa esterna del circuito in¬ 
tegrato, e, più in là, ad un morsetto del connettore C. 


£6579 56577 



USCtU: 
impone +s V 

Uscrts: 
iimpono 0 V 

EnUata: 
pollati a 6 V 

Enlralp; 
pomata 6 0 V 


Cocrì«ttor« 


(Cf figura qui di fronte)* Se scrivia¬ 
mo un 1 con POKE su di un bit 
del l'indi rizzo 56577, la tensione al 
morsetto corrispondente verrà 
pctrtata a +5 V, varrà 0 se scrivia¬ 
mo uno 0, 


Allo stesso modo se leggiamo ^indirizzo 56577 (con PEEK) otterremo 
un 1 se il morsetto è portalo a 5 V dali'esterno, uno 0 se è portato a 0 
V. 

Prima di tutto bisogna decidere se il morsetto imporrà il suo stato 
all'estemo (si dice che è in uscita), o se, all'inverso, si metterà 
all"ascolto' del mondo esterno (si dice che è in entrata). 

Viene usata un'altra locazione di memoria (56579) ogni bit della qua¬ 
le corrisponde ad un bit della locazione (S6577): se c'è un 1 in un bit 
di 56579, il corrispondente bit di S6S77 è in uscita; è in entrata se c'è 
uno 0. 

Creiamo ora il collegamento della figura qui sotto: 



5 6 7 6 S tO IS' 

fi n n fT n n n n 


UULiUUUUU 
A aCDE FHJ 


"1* 


relais 





eetlQre 230 V 


lernpadirta 


ConrwttM A vitto dii dtetio d*t C04 





L L8 La de^ M 


Sì collega il bit 7 del porto (56577) ad un ‘relais* a bassa ìnteosiià^ rb 
portato al +5 V preso dallo stesso connettore (presa 2). Il bit viene 
messo in uscita scrivendo l nel bit 7 di 56579^ il che viene Fatto con 
POKE 56579J28 [infatti 2^= 128). 

Se ora scriviamo un 1 sul bit 7 di 56577, avremo 5 V, quindi 5 V da 
ogni lato del "relais": quindi il contatto sarà aperto, la lampadina 
sarà spenta. 

Se, ai contrario quel bit viene messo a zei^o, la tensione sarà nulla, 
passerà delia corrente nella bobina del ^relais", il contatto sarà chiù* 
so, la lampadina si accenderà. 

Il programma Ed è un esempio di uno di questi Fenomeni: 

PROGRAMMA Ed 


10 IMPUT "f\ CHE ORR DEVO RCOENDE-RE". TRj 
20 INPUT CHE OPR DEVO SPEGNERE^'; TE* 
30 INPUT "CHE ORE SONO".TI* 

40 POKE 56579.12S:POKE 56577.128 
50 IF TI*<:TR* goto 50 
60 POKE 5S577.0 
70 IF TI*<TEà GOTO 70 
00 POKE 56577,128 


Questo programma fornisce soltanto lo scheletro dell'applicazione 
economia di luce che progettavamo qui sopra. Tuttavia si può notare 
l'estrema semplicità di questa prima applicazione. 


ILserei/.io tìd 


Collegare un altoparìante al posto deì "relais' 
guire il programmar 


ea ese- 


10 POKE 56S79J2S 

20 POKE 56577J28: POKE 56577,0: GOTO 20 


Che succede? 


Domanda: avete detto che un PIA ha due porti di 8 bit. Uno solo va 
sul connettore A. Cosa ne è del seccjndo? 

Viene uiilizzuto miernamente dal C64, il quale ha d*altra parte diversi 
PIA che utilizza per comandare le sue varie periferiche^ 

Ecc(>ci giunti al termine di questo libro, al termine della nostra sco* 
perla del C64. 

Bisogna ammettere che si tratta di una macchina meravigliosa, so¬ 
prattutto in rapporto al suo prezzo. 

Le sue possibilità stjno immense, ne abbiamo scoperto soltanto una 
pìccola parte, tanto nei calcoli quanto in gestione, come macchina di 
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svago e dì educazione: il nostro programma di quiz geografico vi per¬ 
mette di rivedere la geografia divertendovi,.. Le possibiliià di tratta^ 
mento grafico sono particolarmente utili in questo contesto, e parti¬ 
colarmente perfezionate sul C64, 

Infine, abbiamo accennalo come il C64 può agire sul suo ambiente, e 
come può essere esteso per avere ancora più possibilità. 

Lasciamo ora il campo alla vostra im magi nazione perché ne tragga iì 
miglior profitto. 


V 
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1 

Funzioni 
e parole chiave 
del Basic 


FUNZIONI ARITMETICHE 

ABS Valore assoluto delFai gomcnio tra parentesi. 

ATN Arco tangente — il risultalo è in radianti, compreso tra — tÌ2 
e t/Z» 

COS Coseno — ì'argomento deve essere in radianti 
Esempio: cos(X in gradi) = cos(t#X/ISO). 

EXP Esponenziale o\ L'argomento deve essere < SS, altrimenti si 
produce un superamento di capacità. 

FRE Per qualsiasi valore dell'argomento, fornisce il numero di by¬ 
te rimasti lìberi in memoria. Esempio: subito dopo l'accen- 
sione, ?FRE(0) fornisce —26627, Bisogna chiedere 
?655364'FRE(0} (è un complemento, vedi pagina 133). Otte¬ 
niamo 38909 e non 3S911 poiché il comando occupa due byte. 

INT Parte intera, o piuttosto numero intero più grande, minore o 
uguale airargomento: iNTfO.S) vale 0; INT(5) vale 5.JNT(—0.5) 
vale -h INT(—3) vale -^3. 

LOG Logaritmo naturale ^neperiano o in base e). Per ottenere il lo¬ 
garitmo dì X in base Y, usare LOG(X)/LOG(Y). Esempio: loga¬ 
ritmo decimale di X = LOG(X)^OG(lO), 

PEEK Fornisce il contenuto (compreso tra 0 c 255) della locazione 
di memoria il cui indirizzo è uguale al suo argomento (che de¬ 
ve essere intero e compreso tra 0 c 65S35). Per scrivere in me¬ 
moria, vedi POKE, pagina 127, 
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POS POS(O) tornisce la prossima posizione di stampa libera suìla 
linea di schermo (posizione del cursore}, 

RND Fornisce un numero pseudocasuaie compreso ira 0 e 1. Vedi 
la spiegazione dettagliata al eapUolo 5, 

SGN Fornisce “segno': 1 se X > 0, —1 se X < 0 e 0 se X = 0. 

SIN Seno — rargomento è supposto in radianti. 

SPC Può usarsi soltanto in una istruzione PRINT. PRlNT SPC(1) 
stampa I spazi. I deve essere intero e compioso tra 0 e 255. 

SQR Radice Quadrata. L'argomento dev'e essere maggiore c> ugua¬ 
le a 0. 

TAB Può usarsi soltanto in una istruzione PRINT. PRINT TAB(i): 
fa andare alia po.sizione dì stampa n* I (0 è la posizione più a 
sinistra di una lìnea, 39 la più a destra). ì deve essere compre¬ 
so tra 0 e 255. Se I < posizione dove sì sta già, non c'è alcun 
effetto, cioè la prossima stampa avverrà nel luogo in cui si 
era posizionali 

TAN Tangente — l'argomento è supposto in radianti. 

DSR Richiamo di un ptx>gramma utente in linguaggio macchina 
(con trasmissione di un argornento, diversamente da SYS), 


FUNZIONI STRINGA 


Le funzioni che riguardano le stringhe dì caratteri sono descritte nel 
capitolo 5. 

Diaino qui sotto la loro lista: 


LEM (X$) 
LEFTS IX$, N) 
R1GHT$(X$, N) 
M1D$ (X$, K) 
ASC |X$) 

CHR$ (K) 

STRS(A) 

VAMX$| 


Lunghezza 

Evirazione a sinistra 
Estrazione a destra 

o M[D$ (X$, K, N) estrazione in mezzo 
Conversione di carattere in ASCII 
Conversione di ASCII in carattere 
Rappresentazione dì un numeix> 

Valore rappresentato da una stringa. 
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PAROLE CHIAVE RISERVATE IN BASIC (e ABBREVIA¬ 
ZIONI) 


ABS (Ab)<'> 

FRE (Fr) 

ON 

SIN (Si) 

AND (An) 

GET (Ge) 

OPEN (Op) 

SPC (Sp) 

ASC (As) 

GOSU& (GOs) 

OR 

SOR (Sq) 

ATN (At) 

GOTO (Gù) 

PEEK (Pe) 

STEF (STé) 

CHR$ (Ch) 

IF 

POKE (Po) 

STOP (Si) 

CLOSE (CLù) 

INPUT 

POS 

STR5 (STr) 

CLR (CI) 

INPUT ff(Iìi) 

PRINT (?) 

SYS (Sy) 

CMD (Cm) 

INI 

PRINT#(Pr) 

TAB (Ta) 

CONT (Co) 

LEFTS (LEf) 

READ (Re) 

TAN 

COS 

LEN 

LET (le) 

LIST (Li) 

REM 

THEN (Tn) 

DATA (Da) 

RESTORE (REs) TO 

DEF (De) 

LOAD (Lo) 

RETURN (REI) 

USR (Us) 

DIM (Di) 

LOG 

RIGHTS (Ri) 

VAL (Va) 

END (Eh) 

MIDS (Mi) 

RND (Rn) 

VERIFY (Ve) 

EXP (Ex) 

NEW 

RUN (Ru) 

WATT (Wa) 

FN 

NEXT (Ne) 

SAVE (Sa) 


FOR (Fo) 

NOT (No) 

SGN {Sgì 



/ 

Nelle abbrqv5g,zÌDni, !c ininuiiciolt rappmsentjino le lelterc cor SHIFT, Esm apiiaio- 
no Én formà l'r^fkA sulto schermo. 
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Repertorio delle istruzioni 
e degli operatori Basic 


Come la guida Mìchelin, as&egnamo stellette alle istruzioni e ai co- 
mandit * * + istruzione fondamentale, * • istruzione importante^ • 
istruzione interessante. Nessuna istruzione che non bisogna esita¬ 
re ad utilizzare se se ne sente il bisogno; alcune di queste Istruzioni 
non vengono trattate in questo libro. 

Inoltre, P vuol dire: istruzione piuttosto da modo programmato,^ ? 
vuol dire: proibito in modo programmato, Ci comando piuttosto da 
modo diretto, proibito in rnodo diretto, 'nulla' vuol dire: ora l'uno 
ora Pakro, 

La definizione è seguita da esempi non commentati che mostrano le 
varie forme che può assumere l’istruzione^ 


Categoria 

Parola 

chiave 


Pag. 


CLOSE 

Chiusura dì file CLOSE 5 

136 

C 

CLR 

Azzeramento di tulle le variabili 

21 


CMD 

Comando di periferiche 

137 

Cf 

CONT 

Continuare nel programma dopo interruzione 

14 

48 

P* 

DATA 

CKcfinisce una lista di costanti che verrano 'let¬ 
te' da un'istruzione; READ. 

W DATA ABC, DEF, 5,3,25 


P* 

DEF FN 

Definizione di una funzione utente. 
lÙ DEF FN F(X}=A*X + B 

96 
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Caic^vHa 


Parola 

chiave 


De R a I zJ m p / 0 


Pftg^ 


P* DIM DimeDSionamento di un array (fissa i valori 5Ì 

massimi degli indici), 

IO DIM A{I5t, m). CSII-U WA^h^O W^N) 

END Termina un programma 22 

* e FOR Introduce un ciclo: tutte le istruzioni comprese 41 

tra FOR I = A TO B STEP C e il NEXT corri¬ 
spondente verranno ripetute per lutti i valori 
di I da A a B, C per C: 

w FOR i=ì ro ÌOOO 

5Q FOR / = 0 ro 2dtJ STEP 6 
60 FOR ì = MTO l*N-\-4 STEF 5 
70 FOR I = $QTO I SYEP —1 
SOFOR ì = L5 TO 2*17 STEP J 

Pf* GET Prende un carattere dalia tastiera W GET AS 74 

P* • GOSUB Richiamo di sottoprogramma IO GOSUB 1000 SO 

P* * GOTO Salto ad un'altra istruzione 70 GOTO 50 13 

P* * IF Salto condizionalo della forma IF condizione 35 

THEN istruzione. Se la condizione non t soddi¬ 
sfatta, si passa alia linea successiva; se la con¬ 
dizione È soddisfatta, si effettua l'istruzione 
che segue THEN, IF c THEN GOTO X si abbre¬ 
via in TF c THEN x o in IF c GOTO Jt, 

70 IF A> B THEN Y=K 
20 IF A = 3 GOTO 1000 
30 IF 4^ < >" THEN 50 

P(^* * * INPUT Acquisizione di dati alla tastiera 11 

10 INPUT A 

20 INPUT A, B, C5, D 

30 INPUT 'INSERITE UN NUMERO': N 

C*** LIST Lista del programma 19 

LIST LIST 10-^ LIST—700 LIST 70 USI 
70-^100 

C** LOAD Caricamento di un programma su cassetta 32 

LOAD LOAD ‘PROG* 

et* NEW Svuota la memoria programma 20 

V * NEXT Fa andare alla successiva iterazione in un FOR 41 

NEXT I NEXT JJ NEXT 
P ON ON I GOTO 10,20,30 

Se 1 vale l, sì va in 10^ se vale 2, si va in 20, in 
30 se vale 3 

ON I GOSUB 1000. 1500, 2000. 5000 

Se I vale L richiama il soituprogramma in 

1000. 2 in 1500, 3 in 2000, 5 in 5000 


ie^ue 
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seguito 


Categùirlct 


Parola 

chiave 


DeFtnLzliHie-CHmpJd 


Pag. 



OPEN 

Apertura dì un file 

OPEN },4 ^ smmpiÀnte 

OPEN 5,40/7>ir4' 

OPEN L,P 

136 

3* 

POKE 

POKE a^b scrive il dato b aìrindirìzzo a. 
POKE 36879,27 POKE K + l,Z—4 

Per tergere in memoria, vedi PEEK 

71 

t + * 

PRINT 

Stampa un risultato Sullo schermo. 

PRÌNT A W PRINT A; B, J 

20 PRiNT2*A+3,B$ 

30 PRINT 'IL RISULTATO E'; B: 

11 


P* READ 'Lettura* dì dati in una istruzione DATA 51 


associata. 

/O ^f:AD A 2Ó READ A, B$, C 

P REM Introduce un commenlo 56 

P RESTORE Torna all inizio dei DATA 51 

P** RETURN Ri tomo da sottoprogramma. 83 

100 RETURN 

C« a « RUN inizio all'esecuzione di un programma. 6 

RUN RUN 500 31 

C* * SAVE Registra un programma su cassetta. 30 

SAVE SAVE 'TATA' 

+ • STEP Introduce il passo di incremento di un POR 44 

P^ STOP Ferma l'esecuzione di un programma 4(1 

ìO STOP 


SYS Fa partire l'esecuzione dì un programma in 

lunguaggio macchina all'indirizzo indicato. 

23 SYS Ó4738 

p* * THEN Introduce l'istruzione da effettuare quando un 35 

IF viene soddisfatto 

* * TO Introduce it valore lìmite di un FOR 43 

cp VERIFY Verifica di un prograrnma che è appena stato 31 

registrato su cassetta 

WAIT WAIT AM,C (C = 0 se asseniej lOS 

Sospende l'esecuzione del programma fino a 
che (contenuto de II'indi rizzo A) AND (B) OR 
esclusivo (O) sia uguale ad 1. 

WAiT653,t attende che sì prema il tasto 'Shift'* 

Assegnamento di valore ad una variabile. I I 


* * * 
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OPERATORI 


AHlmedct 


LogitL 

effiMtuutI bit per bit 


+ addizione di numeri o coricate' 

NOI 

non logicoj 

agisce su un ope- 

nazione di stringhe di caratteri 


rando solo 



— prendere Topposto o soltraKÌone 
* moltiplicazione 

and 

OR 

e logico ì 
o logico J 

2 operandi 


/ divisione 



di rìLassamcrtlo 

bit 

1 bit 2 

AND 

OR 

=uguale odiverso 

0 

0 

0 

1 

0 

0 

0 

1 

< minore > maggiore 

l 

0 

0 

ì 

<=min. O = >=mag. o “ 

1 

1 

l 

l 


= <mln.o= => niag. o 


hir NOT 


0 I 

1 0 



Appendice 


Messaggi d'errore 


Il fatto di disporre di un Interprete che prende le istruzioni Basic una 
per una per eseguirle permette^ quando sì verifica un errore, di iden¬ 
tificare, con precisionCp ristruzione nella quale sì è prodotto 
l'Incidente, 

In conseguenza, i messaggi di errore saranno della forma: 

? me ssaggio ERROR IN numero 

precisando il numero della linea nella quale Terrore è stato incontra¬ 
to. L'unico caso in cui non viene precisato il numero è quello di un 
comando diretto. 

I problemi più correnti provengono da una parola chiave ottografata 
male, da una virgola mancante o da una variabile di un certo tipo 
usata a torto, ecc% 

Dobbiamo notare che un errore segnalato ad un numero di linea può 
non essere altro che la conseguenza di un altro errore: ad esempio un 
DIVlSlON BY ZERO ERROR proviene piuttosto dalla istruzione pre¬ 
cedente dove viene calcolato il divisore. 

Diamo, qui sotto, la traduzione e, per ì più importanti, spiegazioni di 
diversi messaggi di errore che possono essere mandati dal C64 al mo¬ 
mento dell^esecuzìone di un programma Basic, 

BAD SUBS^RIPT (cattivo indice) 

Tentativo dì chiamare un elemento di array d'indice superiore al li¬ 
mite fornito nei DIM. 

Esempio: DIM A(i5) con A(20) o A{2,2). 
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BREAK ERROR (arresto) 

È Stato premuto il tasto mentre si stava eseguendo un comando 
$u cassetta, 

CAN’T CONTINUE (non si può continuare) 

Impossibilità di riprendere l'esecuzione di un programma con CONT^ 
Succede se c'è stato un errore, o se, durante l'interruzione È stata mo¬ 
dificata o aggiunta un'istruzione. In certi casi si può riprendere con 
GOTO numero* t 

DIVI SION BY ZERO (divisione per zero) 


Proviene il più delle volte da una variabile non inizializzata. 


FORMULA TOO COMPLEX (espressione stringa di caratteri troppo 
complessa) 

ILLECAL DIRECT (illegale in modo diretto) 

INPUT, GET e DEF FN sono proibite in modo dirett^. 

ILLEGAL OUANTJTY (valore errato) 

Uso di una funzione con un argomento alFìnfuorì delUntervallo per¬ 
messo, Esempi: 

— indice negativo u >32767; 

— argomento di LOG negativo o nullo; 

— argomento di SOR negativo; 

—‘ 0 potenza numero negativo; 

— lunghezza specificata in MID$, R1CHT$, LEFT$ non compresa tra 
0 e 255; 

— indice di ON GOTO fuori dei limiti; 

— indirizzi in PEEK, POKE, WAIT o SYS non compresi tra 0 e 
65535: 

— byte specificato in WAIT, POKE, TAB o SPC non compreso tra 0 e 
255. 

NEXT WITHOUT FOR (NEXT senza FOR corrispondente) 

Proviene il più delle volte da cicli mal orientati, da una confusione 
sulla variabile segnata nel NEXT oppure se si è soppresso un FOR 
]>er una correzione, dimenticando di sopprimere il NEXT. 
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OUT OF DATA (DATA esaurito) 

Si prova a fare un READ mentre sono già stati 'letti’ tutti ì dati di 
tutte le DATA. Bisogna, o contare con cura i dati, o usare RESTORE. 
Si noti che questo messaggio appare se facciamo Retum' sulla linea 
del messaggio READY che viene interpretato come un READ Y. 

OUT OF MEMORY (memoria esaurita) 

Programma troppo lungo, o troppe variabUì, o troppi cicli e GOSUB 
indentati. 

OVERFLOW (superamento di capacità) 

Risultato di un calcolo superiore a K7E38. NeH'ahro senso, un risul¬ 
tato inferiore a 2,9E—39 è indiscernibile da 0, ma non c'è messaggio 
d'errore. 

REDIM'D ARRAY {array ridimensionato) 

Siamo passati una seconda volta sull'istruzione DiM riguardo ad un 
array. oppure c'è una seconda istruzione DIM per un array, 

REDO FROM START (ricomincia dairinizio) 

Al momento di un'istruzione INPUT, abbiamo fornito una quantità al¬ 
fanumerica. quando ci si aspettava un dato numerico. Bisogna rico¬ 
minciare ridando tutti i valori attesi dall'istruzione INPUT 
considerato. 

RETURN WITHOUT GO$UB {ritorno senza GOSUB) 

Siamo capitati su un RETURN mentre non era stato appena eseguito 
un GOSUB. Il più delle volte dovuto al fatto che sì è dimenticato END 
alla fine del programma principale che precede un sotto-programma. 

STRINO TOO LONG (stringa di caratteri troppo lunga) 

Tentativo di creare (per concatenamento) una stringa di più di 255 
caratteri. 

SYNTAX (errore di sintassi) 

Istruzione incomprensibile per Basic. Dovuto soprattutto a parentesi 
non accoppiate, caratteri illegali, cattiva punteggiatura, errore di or¬ 
tografia in una parola chiave. 
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TYPE MI SMATCH (disaccordo tra numerico e alfanumerico) 

Valore numerico assegnato ad una variabile stringa, o viceversa, op' 
pure argomento numerico fornito ad una funzione che richiede un ar¬ 
gomento alfanumerico, o viceversa. 

UNDEF'D STATEMENT (istruzione non definita) 

GOTO, GOSUB o THEN che rimandano ad un numero di lìnea inesi¬ 
stente. Il più delle volte è dovuto al fatto che si è dimenticalo di cor¬ 
reggere un GOTO,,, quando la linea puntata è stata soppressa o 
spostata. 

UNDEF'D FUNCTION [funzione non definita) 

Riferimento ad una funzione per la quale è stato dimenticato il DEF 
FN. 

Non parleremo, qui, dei messaggi che riguardano i files. poiché tale 
questione non viene trattata in questo libro. In quanto a LOAD e VE- 
RIFY ERROR che riguardano la registrazione dei programmi su cas¬ 
setta essi vengono trattati nel capitolo 3. 



Appendice ^ 

Domande e risposte 


Perché, per sapere che grande?.?^ di meTnoria rimane libera, bisogna 
fare ?65536 + FRE(0) e non semplicemente ?FRE(0)? 

Perc/ié il vostt'O C64 ha troppa memoria. La futitiòrte FR£ è siota scrit-^ 
ra per macchine più. piccole: dà quindi un risultato sm 16 bìts, compre¬ 
so fra —32768 e +32767, li che bastava per le piccole memorie. Ora, se 
la memoria rimasta Ubera supera 32767 bytes, ottenete il risultato in 
complemento a due ed appare negativo. Ristabilite tutto sommando 
65536. Potete trovare dettagli sui complementi a due e sul funziona¬ 
mento dei microcomputers in DJ. DAVID "Les Systèmes à Micropro- 
cesseur ''— EDJTESTS, 

Quando voglio lanciare un prograTnma dopo un'interruzione (in 100), 
posso usare COMT, RUN 100 o GOTO 100 (in modo diretto)* Qual è la 
differenza? 

CONT non può essere usato se. nel corso dell'istruzione, avete apporta¬ 
to una correzione ai programma. Se usate RUN 100, tutte le vostre va¬ 
riabili vetrartno azzerate. Dunque se al momento delVinterruziorte 
avete corretto una variabile bisogna usare GOTO KM). 

Quando la variabile da leggere con INPUT è una stringa di caratterij, 
la si deve mettere tra apici? 

Normalmente ho. La si mette tra apici se la stringa contiene movimen¬ 
ti del cursore, o spazi aìTimzio o alla fine. 

Che cosa succcede quando in INPUT di un numero forniamo una 
stringa di caratteri o viceversa? 

Se ad INPUT rispondete J23. il C64 prenderà la stringa di caratteri 
cifra I, cifra 2, cifra 3; nessun problema. Se ad INPUT A rispondete 
A8C, ci sarà un errore con il messaggio REDO FRQM START e Fistru- 
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ziotie INPUT verrà rieseguita: guindi, per un INPUT a più variabili, 
dovrete ridare tutti i dati. 

C'è un lìmite alla lunghezza delle siringhe di caratteri? 

Si; 255 caratteri, che è già rttolto. Sì noti che una stringa tale non può 
essere data in un colpo solo, poiché una istruzione non può superare 
80 caratteri; essa deve essere costruita per concatenamento. 

Come prevedere fa grandezza di un programma? 

Approssimativamente, un programma occupa tanti bytes quanti carat¬ 
teri racchiude, poiché viene caricato tate quale, come stringa di carat¬ 
teri tranne le parole chiave che vengono sostituite con un codice in I 
byte. Per quanto riguarda le variabifi, ogni variabile numerica occupa 
7 bytes, ogni stringa occupa (7+lunghezza) bytes. Un array occupa 
x(n + I}+2d, dove d è il numero di dimensioni, n la grandezza delTar- 
ray {compreso Velemento n"^ 0) e x — 5 (numeri} o 3 (stringhe di caratte¬ 
ri) Si guadagna del posto memoria sopprimendo tutti i bianchi inutili 
mettendo più istruzioni per linea, evitando i REMt usando variabili 
piuttosto che costantir Usate dei GOSUB non appena bisogna usare 
più volte una sequenza di istruzioni identiche. 

Ho dei problemi quando ho più istnizioni sulla stessa linea, con un 
IF tra di esae. 

La forma: IO istr. /; istr. 2: If c THEN istr. 3: 

20 istr. 4 

non vi deve causare alcun problema. Obbedisce allo schema a blocchi 
a} qui sotto; 


3 > b) 



La forma: 

5 istr, J 

10 IF c TMBN istn 2* istr. 3 
20 istr. 4 
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obbedisce, siti C64 aito schema a blocchi b) qui di fronte. Cioè quando 
ia condizione non è soddisfatta, si passa alh linea successiva e non 
allHstruzione che segue ristruzione introdotta da THEN. 

Cosa succede se metto un'istruzione FOR setiita NEXT? 

Le istruzioni che seguono FOR vengono eseguite una volta (poiché nul¬ 
la dice al C64 che bisogna ricominciare}^ La variabile, citata nel FOR, 
prende per valore il valore di partenza (messo prima di TO). 

Ho dei problemi con i caratteri movimento del cursore quando cor¬ 
reggo un programma. 

Tutti i problemi provengono dei fatta che, quando si vuole un movi¬ 
mento effettivo del cursore, il sistema si trova in modo apici e quindi 
stampa un carattere movimento del cursore differito (s, d ecc.) o vice¬ 
versa. Ecco due casi tipici: _ 

— Quando è stato appena battuto Inst, ci si trova in modo apici nella 
finestra di inserzione quindi, se si prova a metterci dei caratteri curso¬ 
re, si otterranno i caratteri differiti. 

— Quando si entra in una zona tra apici, con movimenti del cursore 
nel corso di una correzione, non si è in modo apici. Qui, ad esempio, 
in 10 PRINT ’dxxx' si vuole sostituire a (listato D j' con b (listato 
gl ), bisogna portare il cursore sul D n fare Inst, b, dd per portare il 
cursore sulla prima x^. e finalmente fare Dèi poi Return - Un altro mo¬ 
do sarebbe stato di portare il cursore sulTapice aperto e di ribattere 
Papice. 

In tutti i casi.in cui stiamo in modo apici mentre non lo desideriamo, 
se ne esce facendo Return e tornando sull'istruzione. 

Come stampare numeri allineati sulla destra? 

5i devono utilizzare le funzioni stringhe di caratteri. Ad esempio, di¬ 
sponiamo di una zona di IO caratteri netta quale vogliamo stampare 
un numero N. Quale che sia il numero ài cifre, vogliamo che il nume¬ 
ro venga stampato a destra della zona. Usiamo la sequenza seguente; 
100 N$ = STR$(N}. L = LEN(N$} 

IW fF L -= IO coro 130 

120 FOR I-l To 10—L:N$= ^^-t-NS^NEXT 

130 PRINT N$ 

possiamo sostituire 120 con 120 PRINT SPC(ÌÙ — L); possiamo pure so¬ 
stituire 110 e 120 con NI = RÌGHT%(” IO sp. ' 10) 

Ho appena fatto un programma che vorrei salvare su cassetta^ ma ho 
dimenticato di posizionare La cassetta e pure di segnare il valore del 
contatore. 

Soprattutto non dovreste fare SAl/£ con la cassetta riavvolta: cancel¬ 
lereste una parte dei programmi già registrati. Quello che bisogna fa¬ 
re, è posizionarsi dietro all'ultimo programma che era staio registrato 
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SU cassetta; supponiamo che si chiami ZOZO. Non possiamo fare un 
LOAD "ZOZO’ perché ZOZO verrebbe in memoria a cancetiare i! pro¬ 
gramma che avete appena fatto. Im solutione è di fare VERIFY ZO¬ 
ZO’, Il contenuto di ZOZO verrà confrontato con it contenuto della 
memoria che non verrà alterato. Avremo un messaggio ?VERIFV BR^ 
ROR, che è normale e al quale non bisogna fare attenzione: la cassetta 
verrà posizionata dietro ZOZO. Potete quindi salvare it vostro 
programma. 

Come sapere che cosa c'è su dì una cassetta? 

È consigtiabile tenere un repertorio delle cassette via via che si riem¬ 
piono. Ma se non l'avete fatto, basta fare un VERIFY ’BZZBZZ". Si 
suppone che BZZBZZ non sia il nome di nessuno dei programmi sulla 
cassetta. Aliora, il C64 percorrerà tutta la cassetta, e per ogni program¬ 
ma che troverà, stamperà: FOUND nome. E siccome noma è diverso 
da BZZBZZ andrà avanti. 

Ho visto, su certi listings. nomi di variabiU che terminano eoo 
Che cos'è? 

Se tratta di un tipo di variabile che non abbiamo studiato: le variahili 
intere. ì loro nomi sono della forma AALBERTO%. 

Possiamo, in un programma,^ avere le ire variabili distinte A% A e A$. 
Le variabili % possono essere dimensionate. Queste variabiii possono 
soltanto prendere valori interi compresi fra —3276? e +32767. Sono 
interessanti per economizzare memoria, dato che occupano soltanto 
due hytes. 

A parte programmi, si possono scrivere anche dati su cassetta? 

Sh Benché questa questione faccia parte deirinsìeme dei trattamenti 
di fites, superi l'oggetto dì questo libro e venga trattata in un'altra ope^ 
ra, VI diamo alcuni elementi: 

Per scrivere dei dati: 

— dobbiamo prima di tutto aprire un file OPEN 5JJ, "NOME’, 

numero logici | [ nome di file 

periferica \ gestito come un 
scrii tura nome di 


programma. 

l numeri di periferiche usuali sono: 

t = cassetta, 2 = interfaccia RS232; 4 =stampa.Tiie; S — disco, 

— Poi, dare gli ordini di scritture successive dei dati: 

PRìNTti S,A variabile da scrivere 

stesso numero logico. 

— Infine, chiudere il file: CLOSE 5 



(permette di ritrovare il file); 



Appendice 4 137 


— ordini di ietture successiva INPUT US,A {analogo alTÌNPUT 
tastiera); 

— chiusura CLOSE 5, 

Ho una stampante. Come usarla? 

Anche qui, affrontiamo problemi di files. Ci ìimiteremo quindi ad in¬ 
formazioni scheletriche. 

Due modi di usare h vostra stampante: 

1° Modo analogo ai files di dati su cassetta: 

OPEN Nessun ttome^ sappiamo che è in scrittura 

nutne'ro stampante 

logico 

PRfNT # TA 
CLOSE 1 

2° Se fate aìt'inizio del programma o, in modo diretto prima del GO¬ 
TO dì lancio del programma: 

OPEN J,4 
e CMD J 

allora ogni vostro ordine PRINT schermo andrà sulla stampante, co¬ 
me ci fosse staio FRINT iti 

Alio stesso modo, i LIST vanno sulla stampante quindi, per ottenere 
un LISTINO su stampante, battete in modo diretto; OPEN 1,4: CMD /; 
LIST Si termina con CLOSE L 




Appendice 


Soluzione degli 


esercizi 


Gli eserciti noti presentati quL hanno normalmente la soloziorLe nel 
testo* 




10 IHPUT'^RPQeiO.HLTeZ5fl";R.H 
Z0 

30 FRIHT''VOLUME'\V 
40 OOTO:0 

im REM 20 E 30 potrebbero ESSERE SOSTITUITI 
110 REM CON 25 PRINT ''VOLUME“'S fT#Rt£i4fH 


Kscrci/.iu 2.2 


10 rHPUT"CRPlTRLE^TftSSO IN Ji, NUMERO Bi RNNl ^C^T.N 
20 I-C*<<l+T/t00) W-1? 

30 PRINT" INTERESSE»i I 
40 GOTO10 


Isserei'/io 3.2 


Premete " Shift " (tenendolo premuto) poi 


CURSQ^ 


quattro volte, 7nj£/Der(duè volte) sempre con " Shift V lasciate 'Shift'e 
battete CI. 


Hserch/io 3,4 


Affinché l'istruzione 50 passi da 30 PRIMT "SUPERFh 
CIE = ", S a 30 PRINT "VOLUME = V; portare il cursore sulla $ di 

cancellare ICIE con Tn- 


supcrficie e battere: VOLUME CURSO^ 


st/Del' quattro volte poi CURSO^ 


fino alla S che sostituite con V* 


4.1 


15 IF SC = 0 GOTO IO 

variante: 15 IF SC = 0 GOTO 50 

50 PRINT 'LA SUPERnCÌE DEVE ESSERE POSITIVA" 
60 GOTO IO 
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IF 

GOTO o IF 

END o uUima istruzioiìc 

Prima istruzione, o numero citato nel co* 
mando RUN o GOTO in modo dlrettó^ 


PRlNTINT(X*10tD)/l0tD 



Ksti cizio 4,3 


Due soluzioni: 
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1. fare la stampa in 65 e mettere 60 N = N + 1; 

2. irììziaiiizare N ad L, il che si deve fare esplicitamente inserendo 10 

N = 1. 


KscicÌjcio 4.7 


Manca la stampa di una prima linea di titolo! 


5 PRINT "NUMERO”. "QUADRATO", "RADICE" 

6 PRINT 


(Il 6 fa saltare una linea) 

Unica istruzione modificata: 
10 POR N = 2 TO 10 STEP 1 


L 


10 : 1 3 5 7 

50: 10 9 8 7 6 5 4 


valore finale 9 
valore finale 3 


Ivsei'cizio 4tl 1 


_ 2 minuti: (Tl-T)/60 è il tempo trascorso in secondi: e 

accordiamo I20s. 


iniiialiKafB T 
iniiialiuare N 1 



U nurr^ra 

^-- 



_T 

Siamo*re 


r» 

Stamgur# 

^'viinio* 



j “(lerso* 


T 
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l%scrcijr.(u 4.13 


ProblemÉi già rìsollo nclì'isìruzìone 40; 


60 PRIKT ‘VINTO IN**; N; "TENTATIVI E"; INT((TbT)/.6)n00 
"SECONDI" 


EserciKÌo 4.14 


15 IF <TI-T)/e0M20 GOTO SS 

M PRINT^Nrt* m TENTATIVI flUTGRIZ^HTI SUPERATO" 
53 ENP 

55 PRINT"TEMPO SUPERATO" 

57 END 


mumiuiiMi 


20 READ C:T->TI 
25 IF C099S53 OOTO 30 
27 RESTORE^OOTO 20 
100 coro 10 

210 DATA 210,70*31,?01.5.31i4- 


F.-seivì/io 3,2 


Dopo il calcolo dtjila ni<?dia avremmo: 


90 V-0 

100 FOR t-1 TO N 

110 V»V+^AC n-pi>t2 

120 NEKT r 
130 V-V/<N-n 


Si può proporre una soluzione più elegante, che calcoli media e va¬ 
riali?^ nello stesso ciclo, e che tragga origine dalla seguente pro¬ 
prietà matematica: 

— M)" = ^(Af- 2MA, + M^) 

= S{A?—2M ^ Ar+ N*M^ 

I t 

= 35 Af-N»M® 
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Ne deriva il pmgramina: 


l’scrci/itj f5.2H 


te Diii 

20 REM LETTURR DEGLI H 
30 S-0:S2-e 
40 FOR l'I TO M 
30 S-3+R<I> S£-S2+R<I>t2 
ee NEXT 1 

70 M-S/N'V-^S2-NiÌiMt£V<N-n 
ee PRIMT"t1EDIR^^‘ ;M^ " VRRIRNZfì-^" J V 



10 DIM U<N>.V<M5 
20 REM UETTURR 

30 uve 

40 FOR I-l TO N 

50 uv *uv+uci>*v<n 
ee KÈKT r 


Lserci/U» 5.3 


10 REM NOM CI OCCUPIRMO PER NIENTE 
13 REM DELLE ENTRRTEXUSCITE 
20 Diri Fl<N.Nj,B<H,is|>,C<N.N> 

30 FOR I-l TO N 

40 FOR J*: TO N 

50 ca^j>=o 

£0 FOR K=l TO N 

70 C<I^ J>+Pa.K>i|!BtK, 

80 NEXT K NEXT J:HEXT I 


Esercìzio 5.& 


10 X5 - LEFTS(X$),4) + "A'+ MIDS{XS,6) 


Esercìzio 5.7 


100 N-LEN(R*>■P-LEN<B*> 

110 FOR K-l TO H-P+1 

120 IF MIP*^RfDOTO 130 

130 NEXT K 

140 K-0 

150 FRINT K 

160 END 
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Quando avrete visto ì sottoprogrami, capirete che è assai sens^ato so¬ 
stituire 160 con 160 RÉTURN. 


l'IsercÌKÌu 5-B 


NC = LEN(STRS(A))— 1 


100 B? = STR$(B):N ^ LEN{B$) 
HO PRTNT LEFTS(BS.N —3) 


Escrcl/.u> 5.10 



Si suppone in partenza che il massimo sia 
in posizione 1. Poi si ^^rcorrc l'array SM 
dalia posizione 2 in poi^ Se si trova un ele¬ 
mento maggiore del massimo supposto, si 
prende quell'elemento come nuovo massi¬ 
mo supposto. 


Si può dunque aggiungere ai programma BJO la sequenza seguente: 


21C PRINTSPRINT Din SMCHJ> 

220 POR TO NJtSJlU>-=0 

230 POR P-l TO NP:SMCJ)-Sf1<J>+SC<J.P> 

240 NEKT F:sn<'J)*SriCJ>^MP NEXT J 

250 jM=*i’n-sria> 

260 POR j*2 TO NJ 

270 IF SìlO^-C-M THEN 23Q 

293 JI1“J:ri'SMU? 

230 HEXT J 

300 FRI NT "IL VINCITORE E ■■;NGm<Jn> 
310 PRINT'XON UN PUNTEGOIO MEDIO DI'Ml 
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UìUIISU4^bB 1I ^ problemi ài classificazione o dì ordinamento sono 
tra i più frequenti. Si distinguono ì pnjblemi di ordinamento semplì^ 
ce dovCf partendo da un array di elementi, si cerca di ottenere^ alla fi¬ 
ne del programma, lo stesso array, ma ordinato, con gli elementi ora 
crescenti o decrescenti; e i problemi di classificazione dove si Lascia¬ 
no al loro posto gli elementi dell'array di parlcnza, ma si forma un 
array ausiliario, detto array di puntatori PO^I), taia che PO(I) sia rim 
dke nell'array di partenza deirelemento che merita di essere classifi¬ 
calo Icsimo- 

II nome dell'lcsimo giocatore classificato è così NfOMSfPO^I)). 

Appena gli elementi sono ingombranti, è più interessante effettuare 
una classificazione piuttosto che un ordinamento semplice; i termini 
da spostare sono più piccoli. 



Un metodo di classi fi camion e semplice deriva dalTesercizio preceden¬ 
te. Supponiamo si voglia una classificazione per ordine di punteggio 
medio decrescente. PO(l) non è altro che il JM ottenuto ìn preceden¬ 
za. P0(2) non è altro che la posizione del massimo successivo e così 
via. 

Ma c'è un altro problema. Quando si cerca il massimo dì una certa 
posizione, non bisogna riprendere un massimo ottenuto prima. Quin¬ 
di, quando si trova un massimo, bisogna sostituire l'elemento con un 
valore minore dì ogni valore possibile (qui —1) di modo che l"eiemen- 
to non venga più ripreso. In tal caso, l'array SM verrà distrutto dalla 
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classificazione. Per evitarlo^ sì ricopia prima l'array SM in un array 
SN sul quale si lavorerà. 

Ne deriva lo schema a blocchi qui di fromc che non è altro che la rh 
petizione di quello dì 5.10 per ogni vaJore di K. K rappresenta la posi¬ 
zione ad un dato momento, nella classificazione. 


£50 DIM SN<NJ>jPO<NJ> 

£60 POR J-1 TC :NEXT 

£70 FOR K“1 TO HJ 
200 JM-t 

£90 FOR J»^£ TO HJ 

300 IF SN<J)<-ri TKEN 320 

310 Jn-J=M-SH<J> 

320 NEXT J 

330 PQ<K>--JM:SN<JF1>-^-1 
340 NE><T K 

350 PRIMI "DRDIHRMEMTO" PRINT 

360 PRIMI "PDS I2I OHE % "GIOCRTORe", "PUNTÉDOIO MEDIO"' : PRINT 
370 FOR I-l TO NJ 

380 PRIHT MOM*<PO(n?^SM<PO<l5> ME^^T 1 


Esìstono altri metodi di ordinamento, Uno del più noti 5i chiama me¬ 
todo del 'bubble sort"" (ordinamento a bolle). Si percorre l'array da 
ordinare confrontando ogni volta due elementi adiacenti. Se stanno 
nel senso giusto^ lì lasciamo, se stanno nell’ordine sbagliato, li scam¬ 
biamo. Se, in un percorso, c'è stato almeno uno scambio. Facciamo un 
nuovo percorso. Se non c'è stato alcuno scambio, vuol dire che, or¬ 
mai, l'array è ordinato. 

I metodi dì ordinamento si applicano airordinamcnto alfabetico delle 
stringhe di caratteri, poiché IF AS <B5 è vera se A$ precede B$. La 
sequenza seguente ordina per ordine alfabetico l'array dei nomi 
NOMJ: 

330 REM 

400 ECH=0 REM IMDICftTDRE DI 3CHMDI0 

410 FOR l"l TO NJ’I 

4£0 JF MOM#<l><"NOMtCH-l> TNEM 450 

430 Tf^MOM^a + l? REM SPiLVfiGURRDIR PER SCAMBIO 

440 N0M*<1+1>”NGM*<I> MOIÌ*<I>-Tt!ECH-l 

450 I 

460 IF ECH-^l goto 400 

470 PRIMI :pRrUT" ordìH flMEHTO fìLFRBEriCO'* 

400 FOR I-l TO Mj:PRIMI HDM$C1>:HEXT I 


__ Usiamo, ad esempio, i segnif \ (Shift U,IjJ^K) e 

istruzioni come 5 PRìNT"... (poiché devono essere sopra a 10). 


l'sereizk» 6.1 
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1 l'lsei'Ci/.ii> 6.2 

1 AABBAA (Si stampa AAAA, poi si inserisce BB 

mezzo) 


iiisei'ci/ifi 6.3 

60 PRINT ^ddd^dddd Rvs'": TB: GOTO 60 



l-.sord^^io 6.5 

POKE 1107,1: POKE 55379,5 


1 Esujci/io 6,6 


300 PRINT 'Clr" 

310 POR 1 = 1 TO 6:POKE 7951 + l.l 28ASC (MID$(TI$J)) 
320 POKE 55793 +1,0: NEXT ItGOTO 310 

Esc tei zìo 6,7 



93 PRIHT-‘RICOMINCinno?" 

91 GET Rf ■ IF «»»-'■” ODIO 91 

92 IF GOTO 10 

93 IF THEN END 

94 GOTO 91 


Se battiamo qualsiasi carattere che non sia 0 o N, non ne viene tenuto 
conto: si ritorna al GET per avere il carattere successivo. 

100 GET A$:1F A$ = '^ GOTO 100 

...seguito... 


Esercizio (i.8 


Esercizio 6^9 


Le principali tappe della soluzione sono: 


1. Decidere i caratteri da utilizzare per rappresentare il cucù. 
Proponiamo(cuore — codice schermo 03) 

^3 (grande croce invertita, 

codice schermo 86+ 128 — 214), 

2. Trovare gli indirizzi: schermo per mettere il cucù nelTarco della 
porta. Vediamo, dagli ordini di impressione, che il cuore sarà in 
Hesima linea, lOma colonna, dal che seguono gli indirizzi 1673, 1713 
e 55945, 55985 (per il colore). 


Iste consegue il programma C'4 h 


— In 65, si testa se si è ad un'ora esatta (vediamo l'uso delle opera¬ 
zioni logiche). 

— In 70, si porta il cucù (di colore bianco grazie a 71). 

— In 75, si lascia il cucù durante un certo iniervallo (circa un deci¬ 
mo dì secondo). 

— In 80, si spegne il cucù (32 è il codice dello spazio). 

— In 85, si mantiene il cucù spento durante un intervallo metà 
dell'intervallo precedente. 











I4fl La scop»erta del Commodore 64 


Se troviamo che rappan?4one del ciigù è troppo fuggitiva, lo possia¬ 
mo lasciare anche mentre il numero dei secondi sta a 01 scrivendo’ 

65 ÌF M$<>'00' OR S$<>'00- AMD SSo^'Or GOTO 55 

Si può anche far apparire il cucù ogni quarto d'ora. Manca soltanto 
un comando sonoro! (lo faremo nel seguito del capitolo). 

PROGRAMMA C.4 


5 PRim^'Tsmxsem^ 

10 PRIHT" 


15 

20 

25 

30 

35 

40 

45 


PRIMI ■' 
PRIHT" 
PRIMI" 
PRIMI" 
PRIMI" 
PRIMI" 
PRIMI'’ 




y 


T-- 

I 

I I i 

II r 


X 


\ 


50 PRIMI*' 

52 PRIMI 

55 H**LEFI*<I1*.2) ^ S!r=^RlOHTICTI t. £ J 

60 PRtMI"r>MÌIOi H 'Mr" t1 "Sf S " 

65 TP t1fO"e9" OR SfO"00" AMD COIO 55 

70 POKE1673.33=P0KE1713.214 

71 P0Ke55545.1■P0KE553e5j1 
75 FORI-lTOieONEXI 

30 P0KE1673.32-P0K£1713.32 
35 FORI^11050-MEMI 
90 GOTO 55 


Ksercizi^i 6.10 


2000 

PRIMI"!” 



2010 

PRINT" 


*" 

20 3 5 

PRIMI" 


a m 

202Ù 

PRINT" 


a m 

2025 

PRIMI" 

^si 

s 

2030 

PRIMI" 

1» 

r' 

203S 

PRIMI” 

it 

I” 

2040 

PRIMI" 

sT 

" 

2045 

PRIMI" 

''a 

1' 

2050 

PP1 UT” 


m 

2055 

FRItlT " 

'U 

m 

206© 

PRIMI" 

SI 

r 

2065 

PRIMI" 


r 

2070 

PRIMI" 

''5S 

m " 

2075 

PRINT" 


2030 

GOTO 2030 
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Kscrfì/ìo 6J 1 


10 C% = 'BiklRcd^ Qyjx^ £uj:" Giii’= Bly' 

20 PRINT Xlr" 

30 POR ! = IT0505 

40 K-INT(1 +7+RND(l)):KS==MlD|{C$,K.l) 

SO PRINT K%: ' + :NEXT 
60 GOTO 60 

L'istruzione principale è 40: si sorteggia un numero ira 1 e 7^ ossia K. 
KS è il Kesiino carattere dì C$ che e precisamente la successione dei 
caratteri di colore (tranne bianco). Sì stampano soltanto 999 caratteri 
poiché, con 1000, il sistema libererebbe iinee bianche. Il 60 GOTO im* 
pedisce di stampare READY. Possiamo incorporare, in C$, ì colori 
che si ottengono con 'C =' ed avere cosi una più grande scelta. 


Ivserci/.io 6*12 


POKE 53280,0 

POKE 53281,1 (quadro nero su sfondo bianco) 

PRINT 'Blkl' (le scritte saranno nere) 

Non rimane che suonare la Marcia Funebre dì Chopin, o la Danza Ma¬ 
cabra di Sainl-Saéns, cose che ii C64 può benissimo fare. 


ilscrcì/io 6-13 


Basta aggiungere nel programma C-5 o C-ó: 


1005 POKE 53281,6 t PRINT 


6 fornisce uno sfondo blu (tenendo il quadro azzurro). 


Esercìzio 6.14 


10 FOR I = 1024 TO 2023yPOKE IJó ; NEXT 
20 FOR t == 55296 TO 55615 t POKE 1,2 : NEXT 
30 FOR l = 5516 TO 55975 : POKE 1,1 : NEXT 
40 FOR 1 = 55976 TO 56295 : POKE 1,6 : NEXT 
50 GOTO 50 

Io 10, si riempie lo schermo di caratteri spazio in revcrse, 

E più facile che non la bandiera italiana perche, essendo le separazio¬ 
ni orizzontali, le zone di memoria da riempire dello stesso colore so¬ 
no contigue. 

Ovviamente, potremmo usai'e anche un metodo elementare con dei 
PRINT 'controllo colore.' 







150 scOfKrta del Commodore 64 


l'.iiorci/io 6.15 


Si aggiungono le istruzioni (180 è modificato). 


23 ERTFHS9.S> 159159.9.21^. 12^216/ 12^ 107,14, 107, 14,63, 13, 

47,16,216,12 

26 IiflTRl00,300,100,300,200,300,200,300,100,300 

45 FOR N"! TO 10 READ MLCN?,NM<H> NEXT 

46 FDR N»: TO 10 READ ND<NVNEXT 
la© Pf?INT":3VINT0" :O0SUB2O00 

2000 V^54296■61=34272 ; HI=L1+1'Wl’L1+4 : fi L-W1+1^ S1*R1+1 
2003 POKEV,10 : POKER!,31■POKESl.240 
2010 FOR N-1 TO 10 

2020 POKE L1,NL^N>:PQKE HI,NHCN?=POKEWt,33 

2030 FOR Z”l TO HDCN^fHEXr 

2040 POKE W1,0 

2030 FOR Z-1 TO 20^HEXT 

2060 NEXT 

2070 POKE Wl,0iPOKEV,0 
2090 RETIJRH 


NL e HH sono gli array delle frequenze e ND è quello delle durate. 


liscrciziu 6J6 


£ V-f3429e:Li=54272-Hl-Ll + l 141-61+4=^1^^1 + 1 'Sl-Rl+l 
7 POKEV,15 POKER1,31'POKESl, 240 


10 

PRINT" 



13 

PRINI" 

K 


20 

PRIMI" 


\ 

23 

PRIMI" 

- 

1 

30 

PRIMI" 

1 ^ 

t-ri ! 

35 

PRIMI" 

r 1 ì 

hH i 

40 

PRJNT" 

\ 1 1 

LJJ 1 

45 

PRINT" 

-ij ..j.. 

1 


30 PRINT" 

32 PRIHT 

35 H*-LEFTf<TI^,2ì tTI*, 3, 2> : S4r-R10HT*ai*, 2> 

6r0 PRIKT'':^kÌ»r3l H tt S " 

63 IF M*<>'’00" OR SiO^'©©'" RNlr S^O'^Ol'^ GOTO 55 

70 POKei673,03^POKEl7l3,2l4 

7 1 P0KE35945,1= P0KE559e5,1 

72 POKEL1,30:pokEH1,23'POKEU1,1? 

75 F0RI-lT020e=HEJ^T 

76 POKE W1,0 

77 FQRI*1TO40:NFXT 

00 POKE1673,32=POKE1713,32 
82 P0KELl,4S:P0KEHl,2e POKENl,17 

85 FORI'lTOlOO NEXT 

86 POKE U1,0 

87 FOIRI-1TO200 WEXT 
90 OOTO 35 





Appendice S 151 




GIOCO 'SIMON' 


JS 18,31^21.22,30,25.4^,28.165,31.135.33 

15 V-54236:Li-54272fHl=-Ll + l Mt-Ll+4f81»Wl + l :S1“FI1+1 
£0 FOR N^l TO SFEfìD NLtN).HH(H>;NEKT 
25 POKE V,l8:P0kEfìi,3l PUKE81.240 
30 PRlNT 'tl" 


40 FOR I-=l TO 4 
50 NS<l>=*lNTU+8#PNDCn> NEWT 
60 FOR 1=1 TO 4 
70 POKE 53281,N3<I>*1 

80 POKE L1,NL<HS<I>> POK£ HI,NHCNSCn>:POKE Wl.l? 

90 FOR 2-1 TO 400JNEXT 

100 POKE W1.0 NE><T 

110 T“05POKE 53231.6 

120 FOR l-rl TO 4 

130 OET fi* IF ‘'0070130 

140 £NCI>=“flSCtfif>'40 

150 POKE 53281, SN< H'I POKELl.^fL<NS<I>> ■POKeHl,HH(SN<I>) ^ 

POKEWl.17 

160 FOR Z-ITO 4O0:NE!<T 

170 POKE Hl.O^hEXT 

130 BENE—1= POKE 53231.6 ; FRI NT "IT' 

130 FOR 1*1 TO 4 

200 BENE-BENE fiNB <NS< I >™3Na NEXT 
210 IF BENE TNEN PRINT'VINTO"■GOTO 240 
220 IF T-0 THEH PRINT“PIPROVR'“ ■ T^i GOTO 120 
230 PRlNT"PERSOi ERfi'' 

235 FOR E-1 TO 4'PRINT NS^I>^■NEXT:PRINT 
240 INPUT "RICOMIWCIHIIO 
250 IF H*="Sr' OOTO 30 


NS è la sequenza preparata dal computer, inentre SN è quella propo^ 
sta dal giocatore. Notate la variabile logica BENE e la sua gestione. 
Ovviamente, potete apportare varianti: numero di note per sequenza 
e ninnerò di tentativi variabili^ possibUità di risentire la sequenza, 
trattamento del caso in cui un giocatore batte su di un tasto diverso 
da quelli da 1 a S. 


Eserci/ìu 6.^IK 


5 V-5423e LI=54272 Hl=L1 + 1'Wll+4 fi 1=H1 +1’Sl^Hl + l 
10 P0KER1,31:P0KES1,240 POKEL1,50=POKEH1,0 POKEWl, 123 
20 FOR H-4 TO 15 
30 PQKE V .H POKENjt , 129 
40 FOR Z*1 TO 15e0=NEXT=NEXT 
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SD FOR Z^l TO ^00 hlEXT 
60 FOR n^iZ TO 4 £TEF“1 
70 POKE V^ftPOKFWl.129 
80 FOR Z^l TO 1SO0 NFXT'NEKT 
80 POKE V,0 


liscrt’iy.io 7.1 


Basta mettere nel ciclo un secondo comando dì stam* 
pa per la seconda funzione, iniziando con una 'a" per venire sulla 
stessa iinea. 


10 PRXNT "7}" 

20 FOR ^^=0 TO 2*n STEP 2*^/22 
3Q Nl*t + IHT<36i*f<:siN<>ì) + J >/2> 

3S N2-l+IKT^36st(<tOSCM>*l>/2> 

40 PRIMI TflB<Nl>J " 

45 PRIMI '^TMI=IBCM2>^'■ + ■' 

50 MEKT X 
60 GOTO 60 

Il secondo grafico si scrive con dei +. Abbiamo ridotto l'intervallo di 
scrittura a 23 linee (ne segue il 22 dell'iseruzione 20) e. I^intcrvallo di 
variazione a 37 (ne segue il 20 in 30 e 35) affinché i grafici tengano 
nello schermo. 


Lscrcì'/io 7.2 


Si pongono problemi: il primo è quello della scala: gli 
effettivi sono tutti abbastanza vicini (da 60 a 120), quindi si devono 
dilatare le differenze, ma comunque tenere un certo termine 
costante. 

Siccome il numero deila classe e l’effettivo sono scritti ad inìzio li¬ 
nea, la scrittura inizia in colonna 11. 

Proponiamo la formula dì riduzione dì scala N = l/2(C(I)—60) che fa 
variare N da iO a 30. Peraltro, siccome TA6(K); "QfP' non fa 

disegnare N spazi, bisogna fare ?'Rvs‘^"; :FOR K=l TO K: ?'Sp"; 
:NEXT: ?^Off^". 

Nc consegue la fine del programma: 


90 PRIMI "CL EFF^‘ 

100 FOR 1=^1 TO 10 N^lMTCCCCn-60>/2? 
110 PRIMI l;CCI>.^'a'S 
120 FOR K^-l TO MIRRIMI' ";:HEXT K 
130 PRIMI "■"'NEMI 1 


Rscrcizio 7.3 


4 POKE 32.4e;P0K£36.4erCLR 

5 P0K€3€334jPEEK<56334^flND254 

6 P0KEl,PEEKCl)flND25l 
IB P0K£l.PEEKa?RND£5t 
20 FOR 1-0 IO 2047 
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30 POKE 02+I^PEEK<Ol+l> NEMT 

35 P0KE1.PEEKC1>0R4 

36 P0KE56334.PEEKC56334)CfRl 

40 DFTR0,0/S9h. 126. 106. 108. 126.39 
45 R-0 

30 POR L-0 TO 7-REfiD R:POKE GZ+e^R+L.fi’NEMT 
60 POKE 53272.CPEEKC53272>fiNl240>+12 
70 PRIMI* fflCnPUa - RLPfi" 


Escrcì'/ìiJ 7,4 


Così come A = A, OR 2tB forza un bit I nelta posizione 
B di A = A AND (255—2TB) forza uno 0 per cui; 


2000 K = X AND 7 :L = Y AND 7 i Q = P + L : Z = Z/(7-K) 
2010 POKE Q, PEEK(Q) AND f255-Z) : RETURN 


|'■sercizi« 7.5 


PROGRAMMA D-2 — TELESCHERMO 


10 PQKE53272.PEEK<332725 OR 8 
20 P0KE32.32-P0KE36.32:CLR 
30 E-e 192 CO''1024 
40 FORI-CO TO CO+999 POKEI. 1 :NE>;T 
45 FORILE TO E+7999^FOKFI.0^NEMT 
50 P0KE53265.PEEK<53263J OR 32 
60 M-0:V-0 

70 00SU3 900:008UB 1000 

00 fi-PEEK<283>:B-PEEK<633>ar fi*64 DOTO 00 

100 IF ft-7 THEN I?^"0: IV-1’OOTO 200 

110 IF Fl-2 THEN EJ^-1 IV-©'OOTO 206 

120 JF fi-51 GOTO 350 

125 IF fi-0 THEN IK^-1:IV-e'GOTO 200 

130 IF P-4 THEK IX—1 ; IV-’*1 :OOTO 200 

133 IF THEH lX-1 f IV—1 = GOTO 206 

140 TF fi"6 THEN IX—1 ■ IV-1 COTO 200 

143 IF fi-3 TH£N IX-1 aV^l‘J30TO 206 

150 GOTOS0 

200 LX-aX+l>iKl59.3-LV-CIV+l?*99.3UF <X-LX>OR<V-LV) GOTOSe 
210 IF B FHD 4 GOTO 230 
22© GQSUB 2000 

230 X-X+IX: V-y+IV:OOSUB900fOOSLlB 1000'GOTO 86 
330 IF B RNE 1 THEN RUM 
333 IF B RKD 2 GOTO 60 
360 IX-0: tv—1 :GOTO 200 

900 XEI-INT^X/S? ■ VH"INTCy7S> :P=E+326#yN+a#XM = RETURN 
1000 K-X FINU 7 L=y NND 7 G-P+L 
1610 P0KE<Q).PEEKC0> 0R2t^7-K> RETURN 
20D0 K-X FfNC 7 :L-V RKB 7= 0-P+L'Z™2TC?-K> 

2010 PGKE □.PEEKCG) fiWD <255*25■RETURN 
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Per far apparire il carattei-e di codice schermo R neila magHa di 
coordinate XM,YM, basta copiare gli 8 bytes voluti del generatore di 
caratteri negli indirizzi da Fa P + 7. 




FOR L = 0 TO 7:P0KE P+L, PEEK{Ó + 8• R + L): 
NEXT (non dimenticate le precauzioni rappresentate dalle istruzioni 
5,6,35^36, pagina 101). 

È per facilitare ciò che la visualizzazione aita risoluzione dei C64 è 
organizzata in maglie, il che sembra strano a primo acchito. 


Rscrcizii) 7.7 


S FR 

10 PRINT"*''. D--É K-i ìS-1 
20 PRIMT"lt K-K+: 

30 GOSOB 1000-IF K<:40 GOTO £0 
40 pRlNf'H 

30 GOSUB 1000:IF K>1 GOTO 40 
60 Di*B+S:XF I)-10 THEM S—1 
70 IF D-i THFN S=l 
80 GOTO £0 
J000 T-TI 

10t0 IF TI-T<D GOTG 1818 
1020 RETURN 


Esercizio 7+8 


3 

10 FRJNT"**'; e13-6 :K-1 

20 PftlNT"lf §W'l =K*K+i 

30 GOSUB 1000 IF KC2^ GOTO 20 

40 PRIMT‘'II IHi '^ "K^K-l 

30 GOSUB 1000:IF K>1 GOTO 40 

60 GOTO 20 

1000 T-TI 

1010 IF TI-T<B GOTO 1010 
10£0 RETURN 


l^sui'L'izio 7.9 


5 PRlNT"'::" 

10 PRINT^'»^';‘D-6-K»l 

£0 PRIMI’ll IOPi-"J K"K+J 

jQ GOSUB 1000 IF K<25 GOTO 20 

40 PRIMI'^11 ini“j K--K-1 

30 GOSUB 1000 IF K>1 GOTO 40 

60 GOTO 20 

1000 T-TI 

101G IF TI-T<D GOTO 1010 
1020 RETURN 
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Ksi!rcÌ7.ìi} 7. Iti 


Basta avere come inìzio di programma: 


10 PCilCE^3269. 1 : POKE332er. 0 ' P0KE33249. 100 
20 FOR J^"24 TC 321 

30 POKE 53248,RNC 255 P0KE 532^4,-<X>255> 
40 HEST 

50 FOR X-321 TO 24 STEP -l 

60 POKE 53248, X RND 255^P0KE 53264,‘(:X>255) 
70 hEXT.GOTO 20 


Provate ad aggiungere STEP 5(o IO) nell'lstru^iorie 20 e osservate ìa 
velocità. 


Kscixì/,ki 7,11 


_ L'isiruzionc IO fa puntare gli OGS 1 e 2 alla stessa 

zona che l'OGS 0: avranno quindi la stessa forma. L'istruzione 50 di* 
lata rOGS ì (il bianco) nei due sensi. 


10 P0KE53277,2■P0KE53271,2 

20 P0KE53269,7:POKE53207,O;POKE532e0,1:P0KE332©9,4 
30 P0KE53249,100'P0KE53253,120 ^ P0KE53251,200 
40 P0KE53£4e,30 = P0KES3252,150= POKES3250,50 :P0KE53264,1 
50 P0KE53277,2 :P0KE53271,2 
60 END 


Ecco ciò che viene visualizzato: 



Esercizio 8J 


Si mandano alternalivamente 0 V e 5 V sulPaliopar- 
lanle (segnale a merli). 

Si ottiene dunque un suono. 

Il programma citala foinisce il merlo più rapido che si possa ottene¬ 
re in Basic. Ora^ la frequenza cosi ottenuta è delLordine di 100 a 200 
Hz. 


Quindi, per fare musica con un Có4 con questo metodo, bisognerà ri¬ 
correre al linguaggia macchina. Ma, il C64, Tabbiamo visto, dispone 
di molto meglio per creare effetti sonori. 
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La scoperta 
del Commodore 64 

1. Introduzione al Baste 


Il Commodore &4 è un computer che permette ap- 
pNcaziont professional e giochi ai tempo stesm 
Questo libro di Introduzione copre entrambi gli 
aspetti e non richiede conoscenze già acquisite. Dopo 
una Introduzione costituita da richiami generali suH'in- 
formatica, viene presentato 31 Basic in modo semplice e 
progressivo. La scoperta dei linguaggio è condotta co^ 
struendo dei programmi per approfondimenti successivi 
net corso dei quali i concetti nuovi vengono Introdotti con 
naturalezza. Sono trattati In particolare I punti forti del 
Commodore 64 e cioè la grafica, il suono^ il colore, l'alta 
risoluzione e gli sprite. 
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